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1.0 GENERAL PROGRAM CUNSIOERA 1 IONS 

1.1 PROGRAM ABSTRACT 

CZ0MU60 IS PART ONE OF THF DHU FUNCUONAl VERIFICATION TE r T, 
THIS PART OF THE TEST VERIFIES THE RESFT, SELF TEST, REGISTER 
ACCESS, BMP CODE, ANO INTERRUPT FUNCTIONS OF THE BOARD ARE 
FUNCTIONING CORRECTLY. 

THIS DIAGNOSTIC HAS BEFN WRITTEN FOR USE WITH THE DIAGNOSTIC 
RUNTIME SERVICES SOFTWARE (SUPERVISOR). THESF SERVICES PROVIDE 
THE INTERFACE TO "HE OPERATOR AND TO THE SOFTWARE ENVIRONMENT. 
THIS PROGRAM CAN EE USED WITH XXDP», ACT, APT, SLIDE ANO PAPER 
TAPE. FOR A COMPLETE DESCRIPTION OF THE RUNTIME SERVICES. REFER 
TO THE XXDM* USER'S MANUAl . THE RF lb A BR IF* DESCRIPTION OF 
THE RUNTIME SERVICES IN THE OPERATING INSTRUCTIONS -COMMANDS 
OF THIS DOCUMENT, 



l.P St STEM REQUIREMENTS 

THE FOLLOWING HARDWA'^F IS REQUIRED TO RUN THF DHU11 FVT: 

UNIBUS PROCESSOR WITH AT LEAST VK ByTES OF MEMORY 

OHU dOARDS INSTALLED ON THE UMHUS. 

APPROPRIATE PROGRAM LOAD Dfc V ICF SUPPORTING XXtfP * 
MEDIA OR A DOWN LINE LOADING SYSTEM. 



1.3 RELATED DOCUMENTS ANO STANDARDS 

XXDP» USER'S MANUAl DtSCUHFS THF RUNNING OK DIAGNOSTICS 

UNOER THE XXDP» MONITOR. 

1.4 DIAGNOSTIC HIERARCy PREREQUISITES 

THF PtfOCFSSOR, TmF UNIBUS, TH* U i > U M hk MilH i , \*\ QON .Jl t U RMlNAl 
AND The, LOAD. MfOIA APf A'i'.uMED TO HAvL D6XN Tt^ItO AND FOUND WORDING 
QLFQRE THIS PROGRAM IS RUN. 



I I 
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FUNC 
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OPERATING INSTRUCTIONS 



THIS SECTION 
FOR DETAILED 



CONTAINS A BRIEF DESCRIPTION OF THE RUNTIME SERVICES. 
INFORMATION, REFER TO THE XXDP* USER'S MANUAL ( CHQUS ; 



a a COMMANDS 



THERE ARE ElEVEN LEGAL COMMANDS FOR THE DIAGNOSTIC RUNTIME SERVICES 
(SUPERVISOR). THIS SECTION LISTS THE" COMMANDS AND GIVES A vERr 
BRIEF. DESCRIPTION OF THFM. THE. XXDP* USER'S MANUAL HAS MORE DETAILS 



COMMAND 

START 

RESTART 

CONTINUE 

PROCEED 

EXIT 

ADD 

DROP 
PRINT 



DISPLAY 

FLAGS 

/FLAGS 



♦O 



EFFECT 

START THE DIAGNOSTIC FROM AN INITIAL STATt 
START THE OIPGNOSTIC WITHOUT INITIAL IZING 
CONTINUE AT TEST THAT WAS INTERRUPTED (AFTER 
CONTINUE FROM AN ERROR HALT 

RETURN TO XXDP* MONITOR (XXDP» OPERATION ONI. t ! ) 
ACTIVATE A UNIT FOP TESTING (All UNITS ARE 
CONSIDERED TO BE ACTIVE AT START TIME 
DEACTIVATE A UNIT 

INFORMATION (IF IMPLEMENTED 
- SEE PERFOMANa AND PROGRESS 
THIS DOCUMENT > 
DEVICE INFORMATION 
ALL HAGS (Stt H 'UiS SECTION) 
CLEAR ALL FLAGS (SEE FLAGS SECTION) 



PRINT STATISTICAL 
BY THE DIAGNOSTIC 
REPORTS SECTION OF 
TrPE A LIST OF ALL 
TtPE JHL STATt OF 



A COMMANO CAN BE RECOGNIZED B* THE FIRST THREE CHARACTERS 
tOU MAT, FOR EXAMPLE, T t PE -STA' INSTEAD 0^ START . 
MORE INFORMATION CAN BE FOUND WITHIN THE SECUGM LABELLED 
EXTENDED COMMAND SYNTAX 



SU 
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SWITCH* S 

THERE. 
THESE 



ARE SEVERAL SWITCHES WHICH ARE USED TO MODIFY 
SWITCH*.*, ARE APPENDED TO THE LEGAL COMMANOS. 



SUPERVISOR 
ALU OF THE 



OPERATION 
l.E I. A!. 



EXECUTE ONLi THOSE TESTS SPECIFIED IN 



SWITCHES ARf TABUIATFD BELOW WITH A BRIEF" DESCRIPTION OF EACH. 

IN THE DESCRIPTIONS BELOW, A DECIMAL NUMBER IS DESIGNATED BY "DDDDD" 

SWITCH EFFECT 

/TESTS:LIST 

'PASS: DDDDD 
/Fl AGS:FIGS 

/EOP; DDDDD 

/UNITS:l.I5T 

EXAMPLE OF SWITCH USAGE: 



THE LIST, LIS T IS A 
NUMBERS, FOP EXAMPLE 
THIS LIST WILL CAUSE 
BE RUN. ALL OTHER T 
EXECUTE DDDDD PASSES 
SET SPECIFIED FLAGS. 
OF THIS DOCUMENT. 
REPORT END OF PASS 
DDDDD PASSES ONL * . 
TEST /ADD/DROP ONLY 
IN \Hi I 1ST. LIST 
USE UNITS 0,5,10,11 



STRING OF TEST 
- /TESTS:1:5:/ 10. 
TESTS 1,5, 7,8.9,10 TO 
.TS WILL NOT BE RL* . 
(DDDDD - 1 TO 64000) 
.SEE THE FLAGS SECTION 

MESSAGE AFTFR EVER* 

(DDDDD • 1 TO 64000) 
THOSE UNITS SPECIF IED 
EXAMP1E /UNITS- 0:5: 10 



12 (UNIT 



0-0?) 



START/TESTS:! 5/PASS: 1000/E OP: 100 

THE EFFECT Of THIS COMMAND Will BE; 1) TESTS 
EXECUTED, v J ) ALL UNITS WILL TESTED 1000 TIMES 



1 THROUGH S 

AND 5) THE 



PASS MESSAGES Will BE PRINTED AF T ER EACH 100 PASSES ONW f 
SWITCH CAN BE RECOGNISED Bt THE "IRST THREE CHARACTERS. 
FOR EXAMPLE, TiPE /TE S: 1 5" INSTEAD OF "'TfSlS:! 5". 



Wll i 
ENO 
A 

T OtJ 



RE 
OF 

MA! 



BELOW IS 


A TABLE 


THAT 


SPECIFIES 


wHl 


COMMAND. 












TESTS 


PASS 


FLAGS 


EOF 1 




. . . „ 


• * 


...•». 




S T AR T 


X 


X 


> 


> 


RE S T AR T 


X 


> 


> 


* 


CONTINUE. 




X 


> 


X 


PROCEED 






X 




DROP 










ADD 










PRINT 










DISPLAi 










f i AlVi 










/F I AGS 










EXIT 











which SWITCHES CAN BE USED Ut EACH 



UNI T S 



Hi 
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e.3 flags 



FLAGS ARE USED TO St T UP CERTAIN OPERATIONAL PARAMETERS SUCH AS 
LOOPING ON ERROR. All FLAGS ARE CLEARED AT STARTUP AND REMAIN 
G. EARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH. FLAGS 
ARE ALSO CLEARED AFTER A START COMMAND UNLESS SET USING THE 
EL At; SWITCH. THE /FLAGS COMMAND MAY ALSO BE USED TO CLEAR 
ALL. FLAGS. WITH THE EXCEPTION OF THE START AND ZF I AGS COMMANDS, 
NO COMMANDS AFFECT THE STATE Of THE F LAGS i THEY REMAIN SET OR 
CI FARED AS SPECIFIED BY THE LAST FLAG SWITCH. 

FLAG EFFECT 

HOL HALT ON ERROR CONTROL IS RETURNED TO 

RLMTIME SERVICES CDMMANO MODE 
LOt LOOP ON ERROR 

IER* INHIBIT ALL ERROR REPORTS 

IBR* INHIBIT ALL ERROR REPORTS EXCEPT 

FIRST LEVEL (FIRST LEVEl CONTAIN 

FRROR TYPE, NUMBER, PC, TEST AND UNIT) 
I;.'* INHIBIT EXTENOED ERROR REPORTS (THOSE 

CALLED BY PRINTX MACRO'S) 
PR I DIRECT MESSAGES TO LINE PHINTFR 

PNT PRINT TEST NUMBER AS TFST EXECUTES 

BOE "BELL" ON ERROR 

UAH UNATTENDED MOOE (NO MANUAl INTERVENTION) 

ISR INHIBIT STATISTICAL REPORTS (DOES NOT 

APPLY TO DIAGNOSTICS WHICH DO NOT SUPPORT 

STATISTICAL REPORTING) 
IDR INHIBIT PROGRAM DROPPING OF UNITS 

ADR EXECUTE AUTOOROP CODE 

I OT I OOP ON TEST 

EVL EXECUTE. EVALUATION (ON DIAGNOSTICS WHICH 

HAVE L VALUATION SUPPORT) 

♦SEE THE ERROR INFORMATION SECTION OF THIS DOCUMENT 

SEF THF XXDP» USFR'S MANUAl FC'l MORF OF TAIL S ON FLAGS. ? OU MA i 

SPf Cl> » MORF. THAN ONt F L AG WITH TMt ► \ Al. SWl I CH , ► OR F xAMPi L , 

TO CAUSf THFJ PROGRAM TO I OOP ON \ RROR , INHIBIT FRROR Ml PORT', 

AND TYPE. A "BFIL" ON ERROR, YOU MAi USE THE FOLLOWING STRING; 

/KLAGS:L0t:IER:B0E 



1 1 
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t "\4 EXTENDED COMMAND St NT A X 

,\4.l ,TART COMMAND • 

STACRT j/TtSTS: <Tl ST I IS1 > /PASS : <PASS CNT>/HA(,s : 
<f LAG LlST*/EOP.-< INCR> 



SEQ 8 



4,1.1 TESTS SWITCH I ' TESTS : * TE ST L 1ST O 



< T f . S T LIST > IS A SEQUENCE Of DECIMAL NUMBERS 
Of DtCIMAL NUMBERS (1-5:8-10 ETC.), SEPERATEO BY 
THE TESTS TO BE EXECUTED . TESTS WTLl BE EXECUTED 
REGARDLESS OF THE ORDER Of SPECIf ICATION . 
ALL TESTS. ON THIS AND ALL SWITCHES. THE 



(l:*. 1 ETC. ) OH RANGES 

COLONS, THAT SPECIf if 

IN NUMERICAL ORDER 

THE DEFAULT IS TO EXECUTE 

ANGLE BRACKETS <> ARE 



PUNCTUATION USFD 
THE OPFRATOR. SEE 

SECTION, 



IN THE DEF INITION 
EXAMPLE AT END 



ONLY, AND ARE NOT TO BE TYPED Re 
OF "EFFECT OF START COMMAND" 



4,1 



PASS SWITCH (/PASS:<PASS CNT > ) 



<PASS-CNT» IS A DECIMAL NUM8EP INOICATING IHt DLSIRFD NUMBER Of 
PASSES. A PASS IS DEFINED hS THE EXECUTION Of THE FULL DIAGNOSTIC 

I' AIL SELECTED TESTS). THE DEF ALU I IS NONE NO INC, EXECUTION. IN THIS 

CASE. EXIT FROM THE PROGRAM IS ACCOMPLISHED E I THf. R B* TtPING A 
CONTROt /C OR BY OCCURANCF OF AN ERROR WITH THE HALT UN ERROR HAG 
BEING SET. THE EXIT IS A RETURN TO COMMAND MODE. SEE EXAMPLE AT END 
Of "EFFECT OF START COMMAND" SECTION. 



.4.1.5 FLAGS SWITCH ( /Y\ AGS : < F LAG 1. 1ST » ) 



<HAG I 1ST* IS A 

«HA(j'l>, OR <FLAG-0> 
THE FOLLOWING VALUES: 



SEQUENCE Of" Elf MEN IS 
SEPARATED BY COLONS, 



OF THE FORM *Fi AG*, 
WHERE <Kl.Al>* HAS UNE UE 



HUE HALT ON ERROR, CAUSING COMMANO MODE TO 

BE ENTERED WHEN AN ERROR IS ENCOUN TIRED. 
10E I OOP ON ERROR. CAUSING THE DIAGNOSTIC TO 
LOOP CONTINUOUSLY WITHIN THE SMAU.E M 
DEFINED BLOCK OF COOING (SEGMENT, SUBTEST, 
,R TEST) CONTAINING THE ERROR. 
IER INHIBIT EPROR REPORTING. 
IBE INHIBIT BASIC ERROR REPORTS, 
IXf INHIBIT EXTENDED ERROR REPORTS. 

PRI DIRECT ALL MESSAGES TO A LINE PRINTER. 
P*4T PRINT F-;JM8F.R Of TESI BEING EXECUTED. 
BSE BEL I ON ?.RROR (NOT RE LA TK) W HE I I PROMPT INl.), 
i JAM pi IN IN UNATTENDED MODE, Bi PASSING MANUAt 

INTERVENTION ( II I FGAl FOR THIS DIAGNOSTIC K 
1UR INHIBIT STATISTICAL HEPUHl*. 



J'l 
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IDU INHIBIT DROPPING OK UNITS BY DIAGNOSTIC. 
(HAS NO EFFECT IN THIS DIAGNOSTIC.) 

LOT LOOP ON TEST. 
THE FLAGS NAMED OR EQUATED TO 1 ARE SET. THOSE EQUATED TO ARE 
CLEARED. A FLAG NOT SPECIFIED IS CLEARED. IF IHt FLAGS SWITCH If, NO I 
GIVEN ALL FLAGS ARE CLEARED, SEE EXAMPLE AT END OF "EFFECT OF START 
COMMAND" SECTION. 

^.4,1.4 END OF PASS SWITCH ( /EOP : < INCR> ) - 

<INCR^ IS A DECIMAL NUMBER INDICATING HOW OFTEN (IN TERMS Of 
PASSES) IT IS DESIRED THAT THf END OF PASS MESSAGE; BF PRINTED. 1M. 
DEFAULT IS AT THE END OF EVERY PASS, SEE EXAMPLE AT END OF "EFFECT UK 
START COMMAND" SECTION. 

2.4.1.5 EFFECT OF START COMMAND - 

THE EFFECT OF THE START COMMANO IS TO INITIATE THE HARDWARE 
PARAMETER DIALOGUE, THE SOFTWARE PARAMETER DIALOGUE, THE 
INITIALIZATION QUESTIONS. ANO THEN THE DIAGNOSTIC COMMENCES TESTING, 

THE HARDWARE PARAMETER DIALOGUE COMMENCES WITH THE QUESTION "0 
UNITS CD) ?" TO WHICH THE OPERATOR SHOULD REPLY WITH THE NUMBER OF 
UNITS TO BE TESTED. FOLLOWING THIS ARE THE QUESTIONS WHEREBY THE. 
P-TABLES THEMSELVES ARE BUILT. EACH P-TABLE IS A CORE -RESIDENT TABlF 
CONTAINING ALL THE. HARDWARE INFORMATION FOR ONE COMPLETE UNIT, EACH 
QUESTION IS FOLLOWED BY THE RESPONSE RADIX (D FOR DECIMAL. B FOR 
BINARY, FOR OCTAL. L FOR YES/NO) IN PARENTHESES ANO THE DfcF AW T 
VALUE AFTER THE PARENTHESES. FOR THE ACTUAL HARDWARE P TABLE 
QUESTIONS SEE THf "HARDWARE PARAMETERS" SEC T ION. 

FOLLOWING THE HARDWARF QUESTIONS ARF THE SOFTWARE QUESTIONS TO 
BUILD THE SOFTWARE TABLES. WmICm DEFINE OPERATING PARAMETERS OF THF 
DIAGNOSTIC PROGRAM. THESE QUESTIONS ARE DESCRIBED IN THE "SOFTWARE 
PARAMETERS" SECTION. 

EXAMPLE; 

STA/TESTS: 1:3-4; /PASS : 5/FLAGS : IER : HOE - 1 

THIS COMMANO WILl CAUSE THREE PASSES TO BF MADE, WITH EACH PASS 
CONSISTING OF TESTS 1,3, AND 4. THERF I. NO DIFFERENCE BETWtEN SAiING 
<H.AG> ANO SAYING <FLAG-l». THF NOTATION «Fl.AG-0» IS MEANINGK* ONL i 
ON A COMMANO OTHER THAN START TO CLEAR A FLAG THAT WAS PRE VIOUSl i SK T . 
NOTE THAT ON ALL COMMANDS ONL i THE FIRST THREE IETTERS ARE. SCANNED, 
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0.4.2 RESTART COMMAND ■ 

R r .S(TART)/TESTS:<T£ -.ST LIST >/PASS ; <PASS CNT>/Fl ACS: 
< C LAG LIST>/UNITS;<UNIT -LIST> 



,\4 1( >.1 TESTS, P/'.SS, AND FLAGS SWITCHES ■ 

<TESi"-LIST>, <PASS-CNT>, AND <FlAG-LIST> ARE AS IN THt START 
COMMAND. 



<*Q 10 



»\4.ci.«? UNITS SWITCH ( /UNIT S : <UNIT LIST > ) - <UNIT-LIST> I 
01 DECIMAL NUMBERS (0,1 El_) OR RANGES OF DECIMAL NLH6ER 
ETC.) THAT SPECIFY THE UNITS TO BE TESTED. THE NUMBERS A'- 
BY COLONS, THE NUMBERS MAY RANGE F^OM THRU N 1 (N IS V 
UNITS SPECIFIED IN THE PREVIOUS START COMMANO). THE NUMBE 
THE POSITION OF THE P- TABLE AS THE DATA WAS ENTFRE 
HARDWARE DIAGLOGUE. THE UNITS WHICH ARE SELEC TC D MUST NOT 
DROPPED BY THE DROP COMMANO. SEE THE DISCUSSION OF 
COMMANDS BELOW DEFAULT IS TO TEST ALL UN V TS WHICH HAV 
DROPPED BY A DROP COMMAND. 



S A SEQUENCE 
S (0-5, 8-10 
V SEPARATED 
HE NUMBER OF 
K INDICATES 
D DURING THE 
HAVE BEEN 
ADD AND DROP 
E NOT BEEN 



c>.4.a.3 EFFECT OF RESTART COMMAND 



RESTART COMMANO DIFFERS FROM THE START COMMAND IN THAT THF 

FROM THE PREVIOUS STmkT COMMAND (THERE MUST HAVE BEEN ONE) 

INSTEAD Of NEU ONES BEING RUTLT. THE UNITS SWITCH SHOULD 

USED WITH THIS PROGRAM. T ML SOFTWARE DIALOGUE MA* OPTIONAL Li 

WILL BE ASKED). THE COMMAND CAN BE USED AFTF.N 

REENTERED IN ANY OF THE THREE NORMAl UAiS: A) 

PASSES HAVE BEEN MADE. B) AN £ RROR WAs 

HALT ON ERROR FLAG SET, OR C ) A CONTPOl /C WAS 



THE 
P TABLES 
ARE USED 
NOT BE 

BE REEXECUTED (OPERATOR 
COMMANO MODE HAS BEEN 
T HE REQUESTED NLH6ER OF 
ENCOUNTERED WITH THE 
ENTERED BY THE OPERATOR 



?.4.3 CONTINUE COMMAND 

CON( IINUE )/PASS:<PASS CNT/f I AGS: <f LAG I Is! * 



i?.4.3.1 FLAG SWITCH ( /FLAGS : <F LAG LIST.) 

<H AG LIST* IS SAME AS IN THE START COMMAND, 
KLAGS RETAIN THEIR CURRENT VALUE. 



HUT UNSPEC1F 1ED 



Li. 
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2,4.3.2 EFFECT OK CONTINUE COMMAND - 



CONTINUE MUST FOLLOW A START OR REDACT, AND COMMAND MODE MUST 
HAVE BEEN ENTERED DUE TO A HALT ON ERROR OR A CONTROL/C. THE E'FECT 
OF THE COMMAND IS TO GO TO THE BEGINNING OF THE TEST THAT WAS BEING 
EXECUTED WHEN THE HALT OR CONTROL/C TOOK PLACE, SOFTWARE DIALOGUE MAY 
OPTIONALLY BE REEXECUTED. HARDWARE PARAMETERS m«j v n0 t BE CHANGED. 



2.4.4 PROCEED COMMAND 

*********************************************************** 

PROv CEED VFL AGS :<FLAG- LIST* 

*********************************************************** 



P. 4. 4.1 FLAGS SWITCH ( /FLAGS: <FLAG-LI5T> ) - 

<FLAG-l.IST* IS AS IN THE START COMMAND, BUT UNSPECIFIED FLAGS 
RETAIN THEIR CURRENT VALUE, 



2.4.4.2 EFFECT OF PROCEED COMMAND - 

PROCEED MUST FOLLOW A START, RESTART, OR CONTINUE, COMMAND MOD* 
MUST HAVE BEEN ENTERED VIA A HALT ON ERROR. THE EFFECT OF THE COMMAND 
IS TO BEGIN EXECUTION AT THE LOCATION FOLLOWING THE ERROR CALL. 
NEITHER HARDWARE NOR SOFTWARE PARAMETERS MAY BE ALTERED. 



2.4.5 ADD COMMAND 

*********************************************************** 

)D/UNITS:<UNIT LIST* 

********************************************************** 



2. 4. 6 EFFECT OF ADD COMMAND 

THE. UNITS SPECIFIED ARE ADDED TO TMF TEST SEQUENCE. EACH 

UNIT MUST HAVE A P-TABLE IN MEMORY DUE TO AN EARLIER 
HARDWARE DIALOGUE. THIS COMMAND MUST HE FOLLOWED By A 

RESTART OR CONTINUE. THE UNITS SWITCH MUST BE SPECIFIED. 

THE ADD COMMAND IS MEANINGFUL ONLY FOR UNITS THAT WERE 
PREVIOUSLY DROPPED, 



2.4.7 DROP COMMAND 
*********************************************************** 

DROCP)/UNITS:<UNIT LIST* 
*********************************************************** 



Ml. 
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2.4.8 EFFECT OF DROP COMMAND - 

THE UNITS SPECIFIED WILL BE DhOPHED FROM TESTING, THE UNITS 
WILL BE RESELECTED ONLY BY THE EXECUTION OF AN ADD OP. START 
COMMAND, THE UNITS SWITCH MUST BE ENTERED, THIS COMMAND 
1UST BE FOLLOWED BY A RESTART OR A CONTINUE COMMAND, 

2.4.9 PRINT COMMAND - 

PRKN1 ) 

2.4.9.1 EFFECT OF PkINT COMMAND - 

THE TOThL NUMBER OF ERRORS FOR EACH UNIT SINCE THE LAST 
START OR RESTART COMMAND ARE PRINTED. THE ISR (INHIBIT 
STATISTICAL REPORTING) FLAG IS CLEARED, 

2.4.10 DISPLAY COMMAND - 
DIS(PLAY)/UNITS:<UNIT-LIST> 

2.4,10.1 EFFECT OF DISPLAY COMMAND - 

THE HARDWARE P TABLE FOR THE TEST STATION IS PRINTED IN THE 
FORMAT IN WHICH IT WAS ENTERED. 

2.4.11 FLAGS COMMAND - 
*♦*♦♦♦*♦♦#♦*♦*♦»♦****♦♦♦♦♦♦«.♦♦»*♦♦#♦*♦»*♦,»»♦»♦♦»»♦»***♦»♦•» 

*LA(GS) 

2.4.11.1 EFFECT OF FLAGS COMMAND 

THE CURRENT SETTINGS OF ALL FLAGS ARe PRINTED. 



Nl. 
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?,4A? /FLAGS COMMAND 
l\ L(AGS) 



2.4. .13 ZFLAG5 COMMAND 

ALL FLAGS ARt CLEARED. 



2.4,14 CONTROL CHARACTERS - 

C A CONTROL/C (C) ENTERLD DURING THE EXFCUTiON OF A 
DIAGNOSTIC CAUSES A RETURN TO COMMAND MODE. 

I A CONTROL// (/) ENTEREO DURING ONE Of THt TWO 
OPERATOR DIALOGUES- HARDWARE P TABl \ DJALUGt.tr. UH 
SOFTWARE P-TAtfLE DIALOGUE CAUSES THf rAULTS TO BE 
TAKEN FOR THE REMAINDER OF THAT DIALOGUE. 

A CONTROL /O (0) ENTERED DURING THE EXECUTION Of A 
DIAGNOSTIC l.AUSES ALL TEL1 T tPE OUTPUT TO BF 
SURPRESSED F 0^ THE RFMAINDER UF THF. DIA[»NJ'.MC OR 
UNTIL ANOTHER CONTROt /O IS TfPED. WHICH RESTORES 
NORMAL TELETYPE OUTPUT, 
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SEQ 14 



2 % 5 HARDWARE QUESTIONS 



W^ir.N A DIAGNOSTIC IS STARTED, THE RUNTIME SERVICES WILL PROMPT 
THE USER FOR HARDWARE INFORMATION BY TYPING "CHANGE HW (L) ?" 
YOU MUST ANSWER "Y" AFTER A START COMMAND UNLESS THE HARDWARE 
INFORMATION HAS BEEN "PRELOADED'* USING THE SETUP UTILITY (SF.c 
CHAPTER 6 OF THE XXDP* USER'S MANUAL). WHEN YOU ANSWER THIS 
QUESTION WITH A "Y", THE RUNTIME SERVICES WILL ASK t OR THE NUMBER 
Of UNITS (IN DECIMAL). YOU WILL THEN BE ASKED THE FOLLOWING 
QUESTIONS FOR EACH UNIT. 



1. CSR ADDRESS - THIS QUESTION REQUESTES THE CSR ADDRESS OF THE 
SPECIFIED DHU-ll. THE DEFAULT ANSWER FOR THIS QUESTION IS 
ADDRESS 160460 (OCTAL). 

^. INTWUPT VECTOR ADDRESS - THIS QUESTION REQUESTS THE INTERRUPT 
VECTOR ADDRESS OF THE SPECIFIED DHU-ll. THE DEFAULT ANSWER IS 
310 (OCTAL). 

5. ACTIVE LINES BIT MAP - THIS QUESTION REQUESTS AN OCTAL BIT 

MAP OF THE SERIAL COMML*IICATION LINES ON THE DHUll WHICH ARE 
BEING SELECTED FOR TESTING. IF THE BIT IN THE BIT MAP IS SM 
WHICH CORRESPONDS TO A PARTICULAR LINE (I.E. BIT 5 FOR LINE 
5 ) THAT LINE WILL BE TESTED BY THE FVT. 

4. BR LEVEL THIS QUESTION REQUESTS THE INTERRUPT BR LEVEL OF 
THE SPECIFIED DHU-ll. THE DEFAULT ANSWER IS UR 5. 
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» SOFTWARE QUESTIONS 

AFTER YOU HAVE ANSWERED THE HARDWARE QUESTIONS OR AFTER A RESTART 

OR CONTINUE COMMAND, THE RUNTIME SERVICES WILL ASK FOR SOFTWARE 

PARAMETERS. THESE PARAMETERS WILL GOVERN SOME DIAGNOSTIC SPECIFIC 

OPERATION MODES. YOU WILL BE PROMPTEO BY "CHANGE SW CD ?" 

IF YOU WISH TO CHANGE ANY PARAMETERS. ANSWER By TYPING 

••>", THE SOFTWARE QUESTIONS AND THE DEFAULT VALUES ARE DESCRIBED 

IN THE NEXT PARAGRAPHC S) . 

1. REPORT UNIT NUMBER AS EACH UNIT IS TESTED THIS QUESTION ASKS 
WHETHER THE PROGRAM SHOULD REPORT THE NUMBER OF THE UNIT WHICH 
IT IS TESTING AS IT BEGINS TO TEST THAT UNIT. 

2. ROM VERSION PRINTOUT ON THE FIRST P«>SS - THIS QUESTION ASKS 
WHETHER THE PROGRAM SHOULD PRINTOUT THE VERSIONS QV THE ON 
BOARD PROCFSSOR ROMS DURING THE FIRST PASS OF THE PROGRAM, 

3. EXTENOED ERROR REPORTING - THIS QUESTION ASKS WHETHER EXTENDFD 
ERROR INFORMATION IS REQUIRED OTHlR THAN THE "TEST FAILED" 
MESSAGE, ON EACH ERROR REPORTED. THE DEFAULT IS "NO" I.E. ONLY 
A MESSAGE REPORTING THE FACT THAT THE TEST FAILED WILL BE 
PRINTED. 

4. NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE THIS 
QUESTION IS ASKED ONLY IF THE PREVIOUS QUESTION WAS ANSWERED 
"YES", THE QUESTION ASKS FOR THE NUMBER OF DATA ERRORS WHICH 
SHOULD BE REPORTED INDIVIDUALLY Ey THIS PROGRAM i OR EACH l INE 
FOR EACH TRANSMISSION TEST. ERRORS WHICH ARE NOT REPORTED 
INDIVIDUALLY ARE R&PQRTEP \H SUMMARY ERROR REPORTS, 
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7 EXTENDED P- TABLE DIALOGUE 



WHEN YOU ANSWER THE HARDWARE QUESTIONS, YOU ARE BUILDING ENTRIES 
IN A TABLE THAT DESCRIBES TME DEVICES v. ,'DER TES1 . THE SIMPLEST 
WAY TO BUILD THIS TABLE IS TO ANSWER A) l QUESTIONS FOR EACH 
UNIT TO BE TESTED. IF YOU HAVE A MUL'iPLEXED DEVICE SUCH AS 
A MASS STORAGE CONTROLLER WITH SEVER ■.. DRIVES OR A COMMUNICATION 
DEVICE WITH SEVERAL LINES, THIS BECOMES TEDIOUS SINCE MOST OF 
THE ANSWERS ARE REPETITIOUS. 

TO ILLUSTRATE A MORE EFFICIENT METHOD, SUPPOSE YOU ARE TESTING 
A FICTIONAL DEVICE, THE XYll. SUPPOSF. THIS DEVICE CONSISTS OF 
A CONTROL MODULE WITH EIGHT UNITS (SUB DEVICES) ATTACHED TO IT. 
THESE UNITS ARE DESCRIBED BY THE OCTAL NUMBERS THROUGH 7. THER^ 
IS ONE HARDWARE PARAMETER THAT CAN VARY AMONG UNITS CA ,l.FD THF 
Q FACTOR. THIS Q-FACTOR MAY BE OR 1 . BELOW IS A SIMPLE WAY 
TO BUILD A TABLE FOR ONE XYll WITH EIGHT UNITS. 

* UNITS (D) ? 8<CR> 

UNIT 1 

CSR ADORESS (0) ? 160000<CR> 
SUB-DEVICE (0) ? 0<CR> 
Q-FACTCP (0) ? 1<CR> 

INIT ? 

CSR ADORESS CO) ? 160000<CR> 
SUB-DEVICE (0) ? 1<CR> 
Q FACTOR CO) 1 ? 0<CR> 

UNIT 3 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE * CO) ? 2<CR> 
Q-FACTOR (0) ? <CR> 

LNIT 4 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE (0) ? 5<CR> 
Q-FACTOR CO) ? <CR> 

UNIT 5 

CSR ADDRESS (0) 7 160000<CR> 
SUB-DEVICE o (0) ? 4<CR> 
Q-FACTOR (0) ? <CR> 

UNIT 6 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE (0) ? VCR- 
Q- FACTOR (0) ? <CR> 

UNIT 1 

CSR ADDRESS 10) ? IM)000<CR> 
SUB DEVICE it CO) ? ^CR* 
Q-FACTOR (0) ? 1<CR> 
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UNIT 8 

CSR ADDRESS CO) 160000<CR> 

SUB-DEVICE ft CO) ? 7<CR> 
Q-FACTOR (0) 1 ? <CR> 

NOTICE THAT THE DEFAULT VALUE FOR THE Q-FACTOR CHANGES WHEN A 
NON-DEFAULT RESPONSE IS GIVEN, BE CAREFUL WHEN SPECIFYING 
MU TIPLE UNITS! 

AS YOU CAN SEE FROM THE ABOVE EXAMPLE, THE HARDWARE PARAMETERS 

DO NOT VARt SIGNIFICANTLY FROM UNIT TO UNIT, THE PROCEDURE SHOWN IS 

NOT VERY EFFICIENT. 

THE RUNTIME SERVICES CAN TAKE MULTIPLE UNIT SPECIFICATIONS HOWEVER. 
LET "l BUILD THE SAME TABLE USING THE MULTIPLE SPECIFICATION 
FEATUPE. 

* UNITS CD) ? 8<CR> 

L*4IT 1 

C V JM ADDRESS CO) ? 160000<CR> 
SUK-DEVICE CO) ? 0,1<CR> 
Q-FACTOR (0) ? 1,0<CR> 

UMI T 3 

CSR ADDRESS CO) ? 160000<CR> 
SUB-DEVICE CO) ? 2-5<CR> 
Q-FACTOR CO) ? 0<CR> 

UNIT 7 

CSR ADDRESS CO) ? 160000<CR> 
SUB-DEVICE * CO) ? 6.7<CR> 
Q-FACTOR CO) ? 1<CR> 

AS YOU CAN SEE IN THE ABOVE DIALOGUE, THE RUNTIME SERVICES WILL 
BUILD AS MANY ENTRIES AS IT CAN WITH THE INFORMATION GIVEN IN ANY 
ONE PASS THROUGH THE QUESTIONS. IN THE FIRSi PASS, TWO ENTRIES 
ARE BUILT SINCE TWO SU6-0EVICES ANO U-FACTORS WERE SPECIFIED. THE 
SERVICES ASSUME THAT THE CSR ADDRESS IS 160000 FOR BOTH SINCE IT 
WAS SPECIFIED ONLY ONCE. IN THE SECOND PASS, FOUR ENTRIES WERE 
BUILT. THIS IS BECAUSE FOUR Sl« -DEVICES WERE SPECIFIED. THt 
" ** CONSTRUCT TELLS THE RUNTIME SERVICES TO INCREMENT THE DATA 
FROM THE FIRST NUMBER TO THE SECONO. IN THIS CASE, SU8-DEVICFS 
?, 3. 4 ANO 5 WERE SPECIFIED. (IF THfc SUB DEVICE WERE SPECIFIED 
By ADDRESSES, THE INCREMENT WOULD BE By 2 SINCE ADDRESSES MUST 
BE ON AN EVEN BOUNOARY.) THE CSR ADDRESSES AND Q FACTORS FOR 
THE FOUR ENTRIES ARE ASSl*1ED TO BF 160000 ANO RESPECTIVELY 
SINCE THEY WERE ONLY SPECIFIED ONCE. THE LAST TWO UNITS ARE 
SPECIFIED IN THE THIRD PASS. 

THE WHOLE PROCESS COW D HAVE BEEN ACCOMPLISHED IN ONE PASb AS 
SHOWN BELOW. 

fl UNITS. CD) ? tt*CR* 
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UNIT I 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE (0) ? 7<CR> 
Q-FACTOR CO) ? 0, 1 ,0, , , • 1, 1<CR> 

AS YOU CAN SEE FROM THIS EXAMPLE, NULL REPLIES (COMMAS ENCLOSING 
A NULL FIELD) TELL THE RUNTIME SERVICES TO REPEAT THE LAST REPLY, 



a«5 QUICK START-UP PROCED\JRE (XXDPt) 

TO START-UP THIS PROGRAM; 

1. BOOT XXDP* 

J. GIVE THE DATE ANO ANSWER THE LSI/UNIBUS AND 50H/ (IF THERE 
IS A CLOCK) QUESTIONS, NOTE, NOT ALL VERSIONS OF* XXDP* ASK 
FOR THE CLOCK FREQUENCY 

3. TYPE "R NAME", WHERE NAME IS THE NAME OF THE BIN OR 
BIC FILE FOR THIS PROGRAM 

4. TYPE "START" 

5. ANSWtR THE "CHANGE HW" QUESTION WITH "Y" 

6. ANSWER ALL THE HARDWARE QUESTIONS 

7. ANSWER THE "CHANGE SW" QUESTION WITH "N" 

WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING ONI. l THl 

DEFAULTS TOR FLAGS AND SOFTWARE PARAMETERS, FOR PrFAUt T INFORMATION 

SEE. THE SECTIONS WITHIN THIS DOCUMENT ON FLAGS, AND HARDWARE QUESTIONS 
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SEQ 19 



5.0 ERROR INFORMATION 

3.1 TYPES OF ERROR MESSAGES 

THERE ARE THREE LEVELS OK ERROR MESSAGES THAT MAY BE ISSUED BY 
A DIAGNOSTIC: GENERAL, BASIC AND EXTENDED. GENERAL ERROR MESSAGES 
ARE ALWAYS PRINTED UNLESS THE "IER" FLAG IS SET (SEE THE FLAGS SECTION 
OF THIS DOCUMENT), 



THE GENERAL ERROR MESSAGE IS OF THE FORM: 

NAME TYPE NUMBER ON UNIT NUMBER 
ERROR MESSAGE 



TST NUMBER PC:XXXXXX 



.WHERE j NAME - DIAGNOSTIC NAME 

TYPE - ERROR TYPE (SYS FATAL, DEV FATAL, HARD OR SOFT) 

NUMBER - ERROR NUMBER 

UNIT NUMBER - - N (N IS LAST UNIT IN PTABl.E) 

TST NUMBER - TEST AND SUBTEST WHERE ERROR OCCURRED 

PCsXXXXXX • ADDRESS OF ERROR MESSAGE CALL 

BASIC ERROR MESSAGES ARE MESSAGES THAT CONTAIN SOME ADDITIONAL 

INFORMATION ABOUT THE ERROR. THESE ARE ALWAYS PRINTED UNLESS 

THE "IER" OR "IBR" FLAGS ARE SET (SEE THE FLAGS SECTION OF THIS 

DOCUMENT). 

THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL MESSAGE 

EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR INFORMATION 
SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA. THESE ARF. ALWAYS 
PRINTED UNLESS THE "IER", "IBR" OR "IXR" FLAGS ARE SET (SEE 1HE 
FLAGS SECTION OF THIS DOCUMENT). 

THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL ERROR 
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES, 
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3,2 SPECIFIC ERROR MESSAGES 

THIS PROGRAM IS INTENDED TO PROVIDE" A GO/NOGO INDICATION 
Of THE FUNCTIONALITY Of THE DHU-H BOARDS. TO EXECUTE THE 
PROGRAM IN THIS MODE Tilt OPERATOR NEED ONLY ANSWER THE 
"EXTENDED ERROR REPOF\ I'NG" SOFTWARE QUESTION WITH "NO", THE 
PROGRAM WILL TH€N ON: , PRINT THE NAME OF THE FAILING TEST 
THE TEST AND ERROR NUMBERS. FOR A LIST OF THE TEST NAMES 
IN THIS PROGRAM SEE THE TEST SUMMARIES SECTION OF THIS 
DOCUMENT. AN EXAMPLE OF SUCH A AN ERROR MESSAGE IS THE 
FOLLOWING; 

C/DHU DVC ML ERR 01603 ON UNIT 02 TST 16 SUB 000 PC; XXXXXX 
DEVICE REGISTER WORD READ/WRITE TEST FAILED. 

THIS ERROR INDICATES THAT A FATAL ERROR WAS ENCOUNTERED WITHIN 
THE TEST WHICH TESTS THE READ/WRITE CAPABILITY OF THE DHU-11 
REGISTERS. 

U THE OPERATOR HAD REQUESTED EXTENDED ERROR REPORTING THE 
SAME ERROR WOULD BE REPORTED AS FOLLOWS: 

C/DHU DVC ML ERR 01605 ON UNIT 02 TST 16 SU8 000 PC: XXXXXX 
DEVICE REGISTER WORD READ/WRITE TEST FAILED. 

BAD BIT(S) IN DEVICE TBUFFAD1 REGISTER FOR LINE 7 (D). 

EXPECTED DATA: 000000 (0). 

ACTUAL DATA: 000023 (0), 



4.0 PERFORMANCE AND PROGRESS REPORTS 

AT THE END OF EACH PASS, THl PASS COUNT IS GIVl N ALONG WIIH THE 
TOTAL NUMBER OF ERRORS REPORTED SINCt THL DIAGNOSTIC WAS STARTED. 
THE "EOP" SWITCH CAN BE USED TO CONTROL HOW OMEN I HE. END 
OF PASS MESSAGE IS PRINTED, FOR FUTHfcR INFORMATION SEE THE 
SWITCHES SECTION OF THIS DOCUMENT. 
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5.0 TEST SUMMARIES 

THE FOLLOWING ARE INCLUDED WITHIN CZDHUB: 

1. DEVICE REGISTER ACCESS TEST - VERIFIES THAT THE UUT REGISTERS 
WILL RESPOND WITH THE CORRECT UNIBUS HANDSHAKING SIGNALS. 
VERIFIES THAT THE UUT IS AT THE CORRECT ADDRESS. 

2. MASTER. RESET (SELFTEST) TEST • VERIFIES THAT THE MASTER. RESET 
HIT CLEARS WITHIN A SPECIFIED TIME OF IT BEING SET. 

3. MASTER. RESET (SKIP SELFTEST) TEST • VERIFIES THAT THE MASTER 
RESET CLEARS WITHIN A SHORT TIME AFTER IT IS SET WHEN THE 
SKIP SELFTEST SEQUENCE IS USED. 

4. RX. CHARACTER FIELD TEST - VERIFIES THAT THE DATA BITS OF THE 
CODES IN THE RXFIFO AFTER A MASTER RESET AND SKIP SELFTEST 
ARE CONSISTANT WITH THE SKIP SELFTEST CODES. 

5. RX.FLAG FIELD TEST - VERIFIES THAT THE 3 DATA STATUS BI T S 
( OVERRUN, FRAMTNG ANO PARITY ERROR BITS) Ar4E ALL SET ON 
EACH OF THE SKIP SELFTEST CODES IN THE FIFO AFTER A MASTER 
RESET ANO S.<IP SELFTEST SEQUENCE. 

h. RX. DATA. AVAIL TEST - VERIFIES THAT THE RX .DATA . AVAIL BIT IS 
SET WHEN THE SKIP SELFTEST CODES ARE IN THE FIFO AND THAT 
IT CLEARS AFTER THEY HAVE BEEN READ. 

7. RX. DATA. VALID TEST VERIFIES THAT THE RX. DATA. VALID BIT IS 
SET FOR ALL THE CODES IN THE FIFO AND CLEAR AFTER ALL THE 
COOES HAVE BEEN READ. 

H. RX.LINE FIELD TEST VERIFIES THAT THE RX.LINE LINE FIFLDS ARE 
CORRECT FOR THE SKIP SELFTEST CODES. 

9. BMP CHECK TEST VERIFIES THAT THE DUT DOES NOT IMMfDlATEM 
FAIL THE BACKGROUND MONITOR PROGRAM, AS THIS MAH INVALIDATE 
FURTHER TESTS. 

10. SKIP SELFTEST TEST ■ ;E3IFIES THAT THE OUT SKIPS THE SFl Ml ST 
IN THE TIME ALLOWED. AND THAT THE FIFO CONTAINS THE CORRECT 
CODES AFTER ITS COMPIEATION. 

11. DIAGNOSTICS AIL (SKIP SELF TFST ) JEST • VERIFIES USING THE 
SKIP SELFTEST SEQUENCE THAT THE DIAG.FAIL BIT GOES W BOTH 
THE ACTIVE AND INACTIVE STATES UITH1N THE ALLOWED TIMES. 

I?. SFLFTEST TEST VERIFIES THAT THE OUT'S SElFTFST EXECUTES 
WITHIN 1HF CORRECT TIME AND THAT THE CORRECT CODES ARE 
RETURNED IN THE FIFO AFTER ITS COMPILATION. 

12. SUMFST F All H$T VERIFIES THAT THh OUT WILL RfcPURT 
ERRORS CORRECTLY WHEN IT IS FORCED TO FAIL, 
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14. ROM VERSION NUMBER - VERIFItS THAT THE ROM VERSION NUMBERS 
ARE REPORTED CORRECTLY ANO IK REQUESTED PRINTS THEM OUT. 

15. CSR BIT 4 TEST VERIFIES THAT WHEN SET THIS BIT CAUSES 
THE SELFTEST TO LOOP. AND WHEN CLEARED THE SKIP SELFTEST 
CODES ARE RETURNED IN THE RXFIFO. 

16. WORD ACCESS READ/WRITE TEST - VERIFIES THAT THE REGISTERS 
RESPOND CORRFCTLY TO READ AND WRITE ACCESSES. 

17. WORD ACCESS READ/MODIFY/WRITE TEST - VERIFIES THAT THE 
REGISTERS WILL RESPOND CORRECTLY TO READ/MODIFY/WRITE ACCUSES. 

18. BITE ACCESS READ/WRITE TEST - VERIFIES THAT THE REGISTERS WILL 
RESPOND CORRECTLY TC CYTE READ/WRITE ACCESSES. 

19. BYTE ACCESS READ/MODIFY/WRITE - VERIFIES THAT THE REGISTERS 
WILL RESPOND CORRECTLY TO BYTE READ/MODIFY/WRITE ACCESSES. 

t!0. 10, BIT TEST • VERIFIES THAT THE ID BIT READS AS SET. 

21. TX. ENABLE (INACTIVE) TEST - VERIFIES THAT WHEN A LINE'S TX.ENBL 
BIT IS CLEAR, TRANSMISSION WILL NOT TAKE PLACE ON THAT LINE. 

22. TX. ENABLE (ACTIVE) TEST - VERIFIES THAT WHEN A LINE'S TX.ENBL 
BIT IS SET, TRANSMISSION WILL TAKE PLACE ON THAT LINE. 

23. INTERRUPT TEST VERIFIES THAT THE DUT WILL GENERATE RECEPTION 
AND TRANSMISSION INTERRUPTS CORRECTLY. 

24. BR LEVEL TEST VERIFIES THAT THE DUT INTERRUPTS AT THE CORRECT 
BUS REQUEST LEVEL. 

25. DIAGNOSTIC FIELD (BMP) TEST • VERIFIES THAT A REQUEST TO THE 
DUT TO REPORT BMP STATUS CODES IS COMPl IED WITH WITHIN THE 
SPECIFIED TIME, ALL ACTIVE LINES ARE TESTED. 

26* REPORT BMP CODES TEST THIS PSEUOO TEST REPORTS THE FIRST 32 
BMP CHARACTERS WHICH WERE DISCOVERED IN THE f'UO DURING THE 
EXECUTION OF THE OTHER TESTS. THIS AVOIDS INTERRUPTION OF THE 
OTHER TESTS Bt THESE CODES IF THEY ARE NOT CRITICAL TO THE 
PER^RMANCE OF THE TESTS. 
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6.0 EXAMPLE ERROR TREE: PASS 

THE FOLLOWING IS AN EXAMPLE UF AN ERROR FREE PASS DIALOGUE: 

.R CZDMUBO 
CZDHUBO.BIN 

DR'. 

C/OHU-B 

DHL' 11 KUNC TST PARTI 

UNIT IS DHU H 

RESTRT ADDR: 147670 

DR>STA/PAS:1 

CHANGF HW (L'J ? Y 

UNITS (D) ? a 

UNIT 

CSR ADDRESS: CO) 160460 ? *Z 

UMIT 1 

CSR ADDRESS: CO) 160460 ? 160500 
INTERRUPT VECTOR ADDRESS: (0) 310 ? 1?Q 
ACTIVE LINE BIT MAP: CO) 177777 ? <CR> 
INTERRUPT BR LEVEL: (0) b ? <CR> 

CHANGE SW (L) ? Y 

REPORT UNIT NUMBER AS EACH UNIT IS TESTED: (L) Y > <CR> 

ROM VERSION PRINTOUT ON THE FIRST PASS: (L) Y ? <CR> 

EXTENDED ERROR REPORTING: (L) N ? Y 

NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE: CD) •' i 

TESTIh'G UNIT : 0(D) 

ROM VERSION NUMBERS: PR0C„1 - 2(D) PR0C..2 * 2(D) 

TESTING UNIT : HO) 

ROM VERSION NUMBERS; PRQC.l * 2(0) PR0C.2 * 2CD) 

L/DHU trOP X 
TOTAL E.RRS 

DR> 
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SEQ 24 



10/5 
10 .'4 

108c"? 
1085 

1084 
108 1 j 
1086 
1087 
1088 
1089 

1CW 

1091 

109c? 

1095 

1094 

1095 

1096 

1097 

1098 

1099 

1100 

1101 

1102 

1105 

1104 

110S 

1106 

1107 

1108 

1109 

1110 

1111 

111.? 

1115 

1114 

111S 

1116 

1117 

1118 

ins 

1136 



000000 



ooooco 



002000 



002000 



002000 

002000 
002000 
002001 
002002 
00200 5 
002004 
00200 S 
002006 
00200 / 
002010 



000001 
000001 
OOOOOl 
000001 
OOOOOl 



002000 



105 
152 
104 
110 
12S 
000 
000 
000 



.LIST SEQ.LOC.BIN.MEB 
.NLIST CND 



.SBTTL PROGRAM HEADER 



,MCALL 
SVC 



SVC 



INITIALIZE SUPERVISOR MACROS 



IF STRUCTURED MACROS ARE TO BE USED, ADD ".MCALL STRUCT" AND "STRUCT" 
TO INITIALIZE THE STRUCTURED MACROS. 



SVCINS 
SVCTST 

svcsue 

SVCGBL 
SVCTAG 



I LIST INSTRUCTIONS, SHIFTED RIGHT 

j LIST TEST TAGS. SHIFTED RIGHT 

j LIST SUBTEST TAGS, SHIFTED RIGHT 

I LIST GLOBAL TAGS, SHIFTED RIGHT 

; LIST OTHER TAGS, SHIFTED RIGHT 



5 CHANGE THE VALUES OF THE SVC... SYMBOLS TO BE ZERO IF YOU WISH 

j TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS. CHANGE THE 

; SYMBOLS TO BE MINUS-ONE TO NOT LIST THE EXPANSIONS. YOU MAY 

5 CHANGE THE SYMBOLS AT ANY POINT IN YOUR PROGRAM. 

;*tfrf*4**|<tftf*tfl<tftftftf*tfl<*tftf«tf«tftf^^ 



.ENABL ABS 
} .ENABL AMA 



2000 



BGNMOD 



THE PROGRAM HEADER IS THE INTERFACE BFTUEFN 
THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR. 



POINTER BGNRPT.BGNSW.BGNSFT.BGNDU.ERRTBL 



HEADER CZ0HU,B,O t 16,O,PRIO7 



L * NAME 



L$REV 



.ASCII 


'C 


. ASC 1 1 


u 


.ASCII 


/() 


. ASC 1 1 


/H 


.ASCII 


.'U 


.Brit 





.mn. 





.BUE 






J 12 
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HEADER 
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002010 


102 




002011 






002011 


060 




002012 






002012 


000000 




002014 






002014 


000016 




002016 






002016 


036700 




002020 






002020 


037072 




002022 






002022 


002212 




002024 






002024 


002224 




002026 






002026 


037454 




002030 






002050 


OOOOOO 




002032 






002032 


000000 




002034 






002034 


OOOOOO 




002036 






002036 


OOOOOO 




002040 






002040 


002124 




002042 






002042 


000340 




002044 






002044 


OOOOOO 




002046 






002046 


OOOOOO 




002050 






002050 


003 




002051 


003 




002052 






002052 


OOOOOO 




002054 


OOOOOO 




002056 






002056 


OOOOOO 




002060 






002060 


004036 




002062 






002062 


0^4222 




0020b-* 






002064 


OOOOOO 




002066 






002066 


OOOOOO 




0020/0 






0020/0 


OOOOOO 




0020/2 






0020 72 


0250 76 




0020 74 






0020 74 


OOOOOO 




0020 76 






Q02Q76 


004046 
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.ASCII 


/B/ 


LJDF.PO: 








* .ASCII 


/O/ 


UUNIT: 








* .WORD 





L$TIMl. : 








* .WORD 


16 


L$HPCP: 








' .WORD 


L SHARD 


LSSPCP: 








* .WORD 


I. » SOFT 


l.$HPFP: 








* .WORD 


L$HW 


LSSPTP: 








* .WORD 


l.$SW 


L*LADP: 








* .WORD 


LiLAST 


LSSTA: : 








.WORD 





L*CO: : 








.WORD 





I SDTrP 


: 






.WORD 





i $APT: 








.WORD 





1.5DTP; 








.WORD 


HDISPATCH 


L$PRI0 








" .WORD 


PRI07 


L*ENVI 








* .WORD 





LU'XPl 








* .WORD 





LSMREV 








* .byte 


CSREVISION 




.BYTE 


CSF.OIT 


l.$EF: : 








.WORD 







.WORD 





I $SPC: 








.WORD 





l.$DEVP 








.WORD 


i $Dvnp 


LSREPP 








' ' . WORD 


URPT 


I $EXP4 








.WORD 





I SEXP5 








' ' . WORD 





L$AUT; 








. WORD 





I $OUT: 








. WORD 


I SDL' 


I $1 UN: 








. WORD 





L*DESP 


i t 






,WORD 


L$UESC 



Nl. 
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C/DHUBO OHU-H FUNC TST PARTI MACRO Ml^OO 1S-MAR 84 09: IS PAGF 14 <;tU 13 

PROGRAM D0CUM6N" 



?.a. \? 7FLAGS COMMANO 
ZEL(AGS) 



«?.4..\3 'FLAGS COMMAND 

ALL FLAGS ARE CLLARLD. 



2.4,14 CONTROL CHARACTERS 

C A CONTROL/C (C) ENTERED DURING the fcXFCUUON OF' A 
DIAGNOSTIC CAUSES A RETURN TO COhMANO MODE. 

Z A CONTROL// U) ENTERED DURING ONE OF TMt TWO 
OPERATOR DIALOGUES- HARDWARE P TABl fc DIALOG'., t. U« 

SOFTWARE P-TAtfLE DIALOGUE CAUSES THf ^AULTS TO BE 

TAKEN FOR THE REMAINDER OF THAT DIALOGUE. 

A CONTROL /O CO) ENTERED DURING THE EXECUTION Of A 
DIAGNOSTIC LAUSES ALL TELETYPE OUTPUT TO Bt 

SUPPRESSED tO** THE RFMAINOER U* THfc DIAGNJ.MC OR 
UNTIL ANOTHER CONTROL /O IS TfPED, WHICH RESTORES 
NORMAL TELETYPE OUTPUT, 



I ■** 



V 



.i*«.'*-.-4k. w 



*** 



tft 1 



v*V- A <*.*«* 



: ^, '■■ »**■ «r, 



^^. 4* ■ ^^.^^ 



, „ < .. >*. >«* 



t 



1 



14 



CVDHLWO DHL' 11 K'NC 
DISPATCH TABLE 



114* 
1 1 V 
11M 
11 V 
1155 
1154 
11SS 
1156 



IIS" 



002122 
002124 
002124 
002126 
002150 
00215*? 
002154 
002156 
002140 
002142 
002144 
002146 
002150 
002152 
002154 
002156 
002160 
002162 
002164 
002166 
002170 
002172 
002174 

OC2176 

002200 
002202 
002204 
002206 
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.SBTTL DISPATCH TABLfc 



000052 

025214 

025476 
025726 
026172 
026570 
026562 
02 7000 
02 7206 
027414 
027610 
030024 
050252 
050546 
031034 
051454 
051776 
052244 
052454 
052752 
055214 
055330 
055646 
054222 
055360 
36 322 
036616 



t THE DISPATCH TABLfc CONTAINS THE STARTING ADDRESS 
{ IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH 
l - - 



Dispatch ae 



Of tACH TEST. 




TEST. 




.WORD 


26 


LJUISPATCH: : 




.WORD 


Tl 


.WORD 


T2 


.WORD 


m 


.WORO 


T4 


.WORD 


TS 


.WORD 


Th 


.WORD 


T/ 


.WORD 


Tfl 


.WORD 


T9 


.WORD 


T10 


.WORD 


Til 


.WORD 


T12 


.WORD 


TH 


.WORD 


114 


.WORD 


T15 


.WORD 


T16 


.WORD 


T17 


.WORD 


Tie 


.WORD 


n* 


.WORD 


T20 


.WORD 


T21 


.WORD 


T22 


.mORD 


T2< 


t U W 


T24 


.i..^D 


T25 


.WORD 


T26 



SEQ 27 



tmtfoptete 
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SFQ 28 



LY 

1*5 
1 '4 
1*5 
l.V 

l "• : 

1 *8 

l ;o 

181 
lift." 
1183 



1184 
1185 

11 At 

1187 
1188 
11 «* 
11*0 
1191 



002210 
0022 12 
002212 



VALUES OF 
THIS TABLE 



SBTTl DEFAUl T HARDWARb P ■ TABLE 



THE DEFAULT HARDWARE P - TABLE CONTAINS DEFAULT 

THE TEST DEVICE PARAMETERS, THE STRUCTURE OF 

IS IDENTICAL TO THE STRUCTURE OF THE HARQWARfc P • TABLES 

AND IS USED AS A "TEMPLATE" FOR BUILDING THE P- TABLES. 



RGNHW DFPTBL 



000004 



.WORD LlQ000-L$HW/3 



002212 160460 

002214 000310 

002216 177/7* 

00^220 005 



002222 











LIHW: : 










DFPTBL 


.WORD 


160460 


jDEFAULT 


CSR ADDRESS 




. WORD 


510 


jDEFAiXl 


VECTOR ADDRESS 




.WORD 


1/7777 


I DEFAULT 


ACTIVE L 1NES BIT MAP 




.B*tTE 


b 


1 DEFAULT 


BR LEVEL 




.EVFN 











ENDHW 



L LOOOO 



D 



V 



tmm Bs«ARk u FrAEit i t pARTi 
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SEQ c>9 



1^00 
1AU 

UW 
1^03 
1^04 
1*W 

u:o : 

l-W 
1*?10 
UHl 



KH4 
luHb 



002^ 
oo t :<w 

00 t \?;?4 
OO.V.?4 

002224 

002226 

002230 
002^30 



000002 



000021 
000000 



.SHTTL SOFTWARE P- TABLE 



; THE. SOFTWARE TAOLE CONTAKo VARIOUS OATA USED 1 THE 

{ PROGRAM AS OPERATIONAL PARAMETERS. THESE PARAMETERS ARe 

j SET UP AT ASSEMBLY TIME AND MAY BE VARIED BY THE OPERATOR 

l AT RUN TIME. 

I •- 



BGNSW SFPTBL 



OPTION: : 
NDERPT;; 



.WORD L1000L-L5SW/2 



L * SW ; : 

SFPTBl 



.WORD 21 
.WORD 



ENDSW 



;BIT MAP l> PROGRAM CONTROL FLAGS 

i DEFAULT NUMBER OF INDIVIDUAL DATA ERRORS TQ RPf 



L 1000 1: 



17 



C7DHUB0 DHU 11 f UNC 
SOFTWARE P TABLE 



122S 
1226 
122/ 
123? 
1238 
123<> 
1240 

I?. Ac" 
124? 
1244 

1245 
1246 

1^4; 

124ft 
124<* 
12S0 
12M 



12 V 

126? 002230 



000020 
177777 



000004 
000006 
000016 



L 



3 
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.SBTTL GLOBAL EQUATES SECTION 



SEQ 30 



} THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
j ARE USED IA MORE THAN ONE TEST. 



NUMLNS--20 
MAPLNS--17777'* 

****** DEVICE REGISTER 
LPR0--4 
FSLS0--6 
TX8FC0»-16 



I NUMBER OF LINES ON 

I BIT MAP OP LINES ON DHUU 



lb. 



OFFSETS FROM THE CSP' S ADDRESS *♦♦♦♦♦ 

ll.XNE PARAMETER REGISTER OFFSET FROM THE CSR 

IFIFOSIZE/STATUS REGISTER OFFSET FROM THE CSR 



ADDRESS 



j TRANSMIT COUNT REGISTER OFFSET FROM THE CSR ADDRESS 



EQUALS 
BIT D1FINITI0NS 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 

001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 



00004 
COCO 3 7 
000036 



RIU5-' 


100000 


BTT14-« 


40000 


6i:i3-« 


20000 


BIT12" 


10000 


BIT11- 


A 000 


BIT10-- 


2000 


BIT09-- 


' 1000 


BIT08- 


• 400 


BIT07-- 


■ 200 


BIT06* 


• 100 


BIT05- 


■ 40 


BIT04-' 


• 20 


BIT03- 


' 10 


BIT02- 


- 4 


BITOl- 


■ 2 


BITOO- 


- 1 


BIT9-- 


BITOS 


BIT6-- 


BIT08 


BIT7-- 


BIT07 


BI T 6»- 


BIT06 


BIT5-- 


BITOS 


BIT4-- 


BIT04 


BIT3-- 


BI103 


B1T2-- 


BIT02 


BITI-- 


BITC1 


BITO-- 


BITOO 


j EVEN 


T FLAG DEFINITIONS 


j FF 


V:FF17 RESERVED FOR SUPERVISOR TO PROGRAM 


U . ST A' 


■U • * 32. ; 


H ,Rf > 


TART*» 31. j 


EF.CQN 


TXNUt** 30» j 



COMMUNICATION 

START COMMAND WAS ISS» 10 
RF START COMMAND WAV. ISS'FU 
CONTINUE COMMAND WAS 1SSUL0 



18 



CrDHUrtO DHUll H»NC TST PARTl 
GLOBAL fcUUATfcS SECTION 

000035 
000034 
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SEQ 31 



F.K.NE.W" 

l.F , PWR • - 



29 

28 



j A NEW PASO HAS BEEN STARTED 
I A POWER -FAIL/POWER-UP OCCURRED 



PRIORITY LEVEL DEFINITIONS 



1268 



000340 

000300 
000240 
000200 
000140 
OOOIOO 
000040 
000000 



000004 
000010 
0000^0 
000040 
000100 
000200 
000400 
001000 
002000 
004000 
010000 
020000 
04 000O 
1QO000 



PRI07 


-- 340 


PRI06 


»* 300 


PRIO^ 


•- 240 


PRI04 


■■ £00 


PRI03 


;«■ 140 


PRIOc 


-- 100 


PRI01 


-- 40 


PRI00-- 


I OPERATOR FLAG 


EVL ■ ■ 


4 


LOT" 


10 


AOR - « 


20 


IDU-' 


40 


ISR-« 


100 


UAM" 


200 


B0E-- 


400 


PNT- 


1C00 


PRI-- 


2000 


IXE« 


4000 


IBE-' 


10000 


IER« 


20000 


\.\M 


40000 


HOE*' 


100Q00 



19 



C/DHUtfO DHU U H'NC 1ST PARTI 
UL0BA1 t UUATES SECTION 



12/0 

12/8 

1280 

1281 

1282 

1283 

1,784 
128S 

i *.:»(? 
128/ 

1288 

128^ 

1291 

1292 

12^3 

12**4 

129s 
1296 

1297 
1298 
129'* 
1500 
1301 
1 50c' 
1303 
1304 
1 30S 
1306 
130? 
1 308 
1 309 
1310 
1311 
1312 
1313 
1314 
131*. 
151t, 
151/ 
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SEU 32 



0022.30 

0022.V 

002254 
002236 
002240 



1 7777/ 
000300 
000304 
000000 
004 



1318 
1319 
1520 
1321 
1 322 
132.3 
1 324 
132S 
1 326 
1 32 / 
1328 
13<"* 
1 3 30 
1 3 3 1 
I 5 32 
1533 



002242 
002242 
002244 
002246 
0022S0 

0022S2 
0022S4 
0022 S6 
002260 



002262 

002264 
002266 
0022 70 
002272 
0022 74 
002276 
002500 



0023C<> 
002304 
00230b 
002.3 10 
002312 
002314 



160020 
160022 
160024 
160026 

160030 
160032 
160034 
160036 



005464 
0054 70 
0054 fb 
005501 
005517 
005526 
00553 7 
005550 



000000 
000000 
000000 
1)00000 

oocooo 
oooooo 



.SBTTL GLOBAL DATA SECTION 



THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 
IN MORE THAN ONE TEST, 



.**«««** + «»**««»««**** + «*« + ***<,.***« + ******* + *«*«♦**** + «**** + *****>*» + ** 
{ UNIT VARIBLF. AREA 

ACTt.NS:: .WORD 177777 j ACTIVE LINE BIT MAP. 

RXVECA;; .WORD 300 jRX VECTOR ADDRESS. 

TXVECA;: .WORD 304 »TX VECTOR ADDRESS. 

UNITN:: .WORD iUNIT NUMBER. 

BRLEVLu .BYTE 4 i INTERRUPT BUS REQUEST LEVEL 
.EVEN 



i 



DEVICF REGISTER ADDRESS TABLE 

DRADRT: : 

.WORD 

.WORD 
.WORD 
.WORD 



RXTMA: 



FDATA: 



CSRA: : 
RbUFA: 
LPRA: : 
FSLSA; 



160020 
160022 
160024 
160026 



I DHU - 1 
|0HU-1 
iDHU-1 



LNCTRA; 
TXAD1A: 
TXAU2A; 
TXBKCA; 



.WORD 
.WORD 
.WORD 
.WORD 



16OU30 
160032 
160034 
160036 



I DHU 
|AND 

j DHU 
j DHU 
I DHU 
I DHU 



1 CSR ADDRESS. 

1 RECIEVE BUFFER/TIMER ADDRESS. 

1 LINE PARAMETER REGISTER ADDRESS. 

1 FIFO SIZE /LINE STATUS REGISTER ADDRESS, 

IEO DATA REGISTER ADDRESS. 

1 LINE CONTROL REGISTER ADDRESS. 

t TRANSMIT BUFFER 1 REGISTER ADDRESS 

1 TRANSMIT BUFFER 2 REGISTER ADDRESS 

1 TRANSMIT BUFFER COUNT REGISTER ADDRESS 



****************************************************************************** 
dtctctcd Mcccorc annates tori f 



REGISTER MESSAGE ADDRESS TABLE 



RMATBB 



+ + 



.WORD 


DROOMG 


» ADDRESS 


Of 


.WORD 


DR02MG 


j ADDRESS 


OF 


.WORD 


DR04MG 


j ADDRESS 


OF 


.WORD 


DR06MG 


I ADDRESS 


OF 


.WORD 


DR10MG 


{ADDRESS 


OF 


.WORD 


DR12MG 


tADDRESS 


OF 


.WORD 


DR14MG 


jADDRESS 


or 



.WORD DR16MG t ADDRESS OF 



"CSR" MESSAGE. 
"RBUF" MESSAGE. 
"LPR" MESSAGE. 
"STAT" MESSAGE. 
"LNCTRL" MESSAGE. 
"TBUFFAD1" MFSSAGF 
"TBI2FAD2" MESSAGE. 
"TBUFFCT" MESSAGE. 



At*****************.*** * 



j ASSORTED GLOBAL VARIABLES: 

BUfPTR:: .WORD ^STORAGE FOR RECEIVE CHARACTER BUFFER POINTER. 

i "EXIT ON ERROR" f LAG. 

(STORAGE FOR THE CONTROL -C Ft AG . 

jSIORAGE K)R THE INTFRRUP1 ENARLfc BIT S T rtTl... 

iSTOG 'OR PASS COUNT USED IN ROM VFRUON TEST. 

jSTORAGE FUR RECEIVER INTERRUPT FLAGS. 



F. XOERR; : 


.WORD 


CIRLO : : 


.WORD 


IFSTA?: : 


. WORD 


PASCNT; : 


.WORD 


RXINTC? : 


.WORD 



20 



g£8B» ,0 n8VX-^cWS5 



H3 
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SfcQ 33 



1554 

1335 

1536 

1337 

1338 

1339 

1340 

1341 

134,? 

1343 

1344 

1345 

1346 

1 34 7 

1348 

134^ 

1350 

1351 

1 352 

1 353 

1354 

1355 

1556 

135/ 

1358 

1359 

1360 

1361 

1562 

1363 

1564 

1 365 

1366 

136 7 

1 368 

1369 

15/0 

13/1 

15'/ 2 
1375 
13/4 
15/5 
15/6 
157/ 
15/H 
13/9 
1 580 
1581 
1382 
1583 
1384 
1 385 
1 386 
138/ 
1 388 
1/b'J 
1390 



002316 
002320 
002322 
002324 
002326 
002330 
002332 



002334 
002336 
002340 
002342 
00234a 
002346 
002350 
002352 
002 35'; 
002356 



002360 
00236.' 
002364 
002366 



0023/0 
0023/2 
0023/h 
002376 
002400 
002402 
C 024 04 
002406 



002410 
002412 
002414 
0024 16 
002420 
002422 
002424 
002426 
0024 «i0 
0024 V 
OCV4 54 
002436 



oooooo 

000000 

oooooo 

000001 

oooooo 
oooooo 
oooooo 



1/7546 

000300 
000100 
0000/4 

oooooo 
oooooo 

000170 

000170 
000021 
000062 



17 7572 

oooooo 
oooooo 

172340 



137660 
1/7/77 
00000 / 
17777/ 

166051 
OOOOOO 
1/7/74 

oooooo 



000001 
000002 
000004 

OOOOIO 
000020 
00004 
000100 
000200 
000400 
OOIOOO 
002000 
004000 



RXINTF 
TP4FLG 

TP4VEC 
TSTNUM 
TXINTC 
1XINTF 

W0RD1: 

{ *** + **** + 4*4* 

; LINfc T 

. 44*4********* 

CLKCSR 
CLKBRL 
CLKVEC 
CLKHRZ 
TIMER1 
TIMER2 
TIMER3 
BC0UN1 
MSTICK 
MSLCNT 



.WORD 

.WORD 

.WORD 

.WORD 1 

.WORD 

.UORD 

.WORD 



4444**4*4 

IME CLOCK 
********* 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



******** 

VARIABL 
****** *.* 

17/546 

PRI06 

100 

60. 





120. 

120. 

1/. 

62 



I STORAGE FOR RF.CF.IVFR INTERRUPT FLAGS. 

(FLAGS SET WHEN AN EXPECTED 004 TRAP OCCURS. 

j STORAGE FOR THE NORMAL 004 TRAP VECTOR. 

I STORAGE FOR THE TEST NUMBER. 

, STORAGE FOR TRANSMIT INTERRUPT COUNT. 

j STORAGE FOR TRANSMIT INTERRUPT FLAGS. 

jLOCATION FOR PASSING INDIRECT PARAMETERS. 

************************************************ 
15 AND STORAGE, 

44**4444*4444******44 4 444*****+***+**+****+*+*** 

,CSR ADDRESS OF THE LTC. 

I INTERRUPT PRIORITY LEVEL OF THE l.TC. 

t INTERRUPT VECTOR ADDRESS OF THE LTC. 

i INTERRUPT FREQUENCY OF THE LTC. 

jHARDWARE CLOCK COUNTER 01. 

I HARDWARE CLOCK COUNTER 02. 

lHARDWARE BREAK COUNTER LOCATION. 

jBREAK COUNT VALUE IN CLOCK t X CKS. 

jNUMBER OF MILLI-SECONOS PER l.TC TICK. 

lLOOP COUNT (USED BY MSI. OOP) TO DELAY 1 MS. 



44444+******************+***+*******+***++****+*******-********************»*** 

MEMMORY MANAGEMENT VARIABLES AND FLAGS. 
************************************************* ******************** ********* 



MMSRO: 
MMPRES 
MMENAB 
PAROA: 



.WORD 177572 i ADDRESS OF MEM MGT STATUS RLGtSTER 00. 

.WORD jMEM MG1 PRESENT FLAG (0 IF MM NOT PRESENT). 

.WORD jMEM MGT ENABLED FLAG (0 IF MM NOT ENABLED). 

.WORD 172340 jADDRESS OF MEM MGT PAR 00. 



HIT MASK TABLE OF UN-USED DHU DEVICE REGISTER BITS 



* 4 * 4 * * 



****<.************************** 



.1*****************4******************** 

UNBTTB: : .WORD 157660 i UNUSED BIT MASK FOR THE CSR 

.WORD 17777/ (UNUSED BIT MASK FOR THE 

.WORD 7 j LOUSED BIT MASK FOR THE 

.WORD 177777 (UNUSED BIT MASK FOR THE 

.WORD 166051 j UNUSED BIT MASK FOR THE 

.WORD j UNUSED BIT MASK f OR THE 

.WORD 1/7 774 i UNUSED BIT MASK FOR THE 

.WORD j UNUSED BIT MASK FOR THE 



RBUf/RXTIMER RFG 

LPR 

STAT/FTFOSIZE/DATA 

LNCTWL 

TBUf FAD1 

TBUf'f AD2 

tbuftct 



REG 



******** 

T 
******** 

BITTBL;? 



4*6**********************4 ***************4*************************+** 

ABLE Of- WORDS WI VM CORRESPOND I NG BIT SET f OR GENtRATION Of BIT MAPS. 

**«**********44444*44* + *»**********444*444**** + **4** + * + ****** + *** + **-* + 



.WORD 

WORD 

WORO 

UORD 

WORD 

UORD 

WORD 

UORO 

WORD 

WORD 

WORD 

WORD 



1 

4 
10 

20 

40 

100 

200 

400 

100O 

2000 

4000 



jBIT 


SET. 


iBIT 


1 SET. 


(BIT 


? SET. 


jBIT 


3 SET. 


(BIT 


4 St 1 . 


|BIT 


5 St t . 


iBl * 


6 5M . 


(BIT 


.' St I . 


jHIl 


8 St 1 . 


jBIT 


'* St ! . 


\k\l T 


10 St f 


jQIT 


11 StT 



/ 



8 



ZDHUHO DHU-11 H'NC 
■LOB A I DATA SECTION 
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SEQ 



1591 002440 


010000 


1592 002442 


020000 


1595 002444 


040000 


1594 002446 


100000 


1 395 




13<H> 




1 -V» ■ 




1398 




1394 0024 SO 




1400 002450 


000000 


1401 0024 r >2 


oooooo 


1402 002454 


oooooo 


14 05 002456 


oooooo 


1404 002460 


oooooo 


14 OS 




140b 




140 : 




1408 




1409 002462 


oooooo 


1410 002464 




1411 




14 12 




141? 




1414 




14 IS 002524 


oooooo 


14 \d 00252^ 




14 17 002726 




1418 




14 14 




14 20 




1421 




1422 002/26 




1425 002/26 




1424 00552b 




142S 003526 




1426 005/26 




142 7 003726 




1428 




1429 




1450 




1443 003/66 




005 766 




003 766 


oooooo 


00 5 / 70 


oooooo 


005 //2 


oooooo 


003774 


oooooo 


1444 




1445 





WORD 
WORD 
WORD 
WORD 



10000 
20000 
40000 
100000 



{BIT 12 

{BIT 15 

{BIT 14 

■ BIT 15 



SET 
SF.T 
SE1 



;♦ GPR SAVE AREA ZERO. 



GPR SOB | J 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 












{BASE OF GPR SAVE AREA NUMBER ZERO. 

I WORD 1, STORAGE FOR Rl. 

{WORD 2 t STORAGE FOR R2 . 

{WORD 3, STORAGE FOR R3. 

{WORD 4, STORAGE FOR ft 4 . 

»W0RD 5, STORAGE FOR R5. 



{♦ TRANSMISSION AND RECFPTION VARIABLES. POINTERS, AND FLAGS. 

ERSMRF • : .WORD {ERROR SUMMARY REPORT FLAGS, 
ERCNTB:: .BLKW 16. {TABLE OF ERROR COUNTERS. 

5 STORAGE AREA FOR THE BMP CODE QUEUE. 



BMPCQP 
BMPCQB 
BMPCQE 



.WORD 
.BLKW 




64 



{POINTER USED TO ACCESS THE NEXT CELL IN QUE 
{STORAGE FOR 32 CELLS, TEST* PLUS BMP CODE 
{LAST ADDRESS PLUS 2 OF THE BMP CODE QUEUE 



5 GfNERAL TABLE ANr BUFFER AREA- -513 WORDS. 



BUFBAS 
ERLTBL 
BUFMID 
BUF 5QT 
BLIFEND 
ENDETB 



.BLKW 
.BLKW 
.BLKW 



128. 

64. 

64. 



.BLKW 16, 



ERRTBL 



{BASE OF MEMORY BUFrER. 

{FIRST HALF OF GENERAL TABLE OR SUFFER. 

{SECOND HALF Of GENERAL TABLE OR BUFFER. 

{LAST QUARTER OF THE BUFFER AREA. 

lENO OF GENERAL PURPOSE MEMORY BUFFER. 

{BUFFER OVERFLOW SPACE. 



L (ERRTBL 



ERKTyP: 
ERRNBR: 
EHRMSG; 
ERRBLK; 



WORD 





WORO 





WORO 





WORD 






.EVEN 



J 5 



??. 



CZDHUUO DHU-il H.SNC 1 ST PARTI MACRO Ml?0O 
GPR HANOI ING ROUTINES FOR SUBROUTINE CALLS, 



15 -MAR -84 00:15 



SEU 35 



1447 

1448 

1449 

14 SO 

1451 

145? 

145? 

1454 

1455 

1456 

1457 

1458 

145 c > 

1460 

14*0. 

146? 

146? 

1464 

1465 

1466 

146/ 

1468 

1469 

14/0 

1471 

14/? 

14 7? 

14/4 

14 75 

14 76 

14 7 7 

1478 

14 79 

1460 

1481 

148? 

1483 



SBTTL GPR HANDLING FOUTINES FOR SUBROUTINE CALLS. 

******************* 4 ***************************************** ********+*♦****♦ 

THERE ARE 4 ROUTINES AND MACRO DEFINITIONS USED FOR THE HANDLING OF 
GPR VALUES DURING SUBROUTINE CALLS WITHIN THIS PROGRAM. THE FOUR 
ROUTINES/MACRO CALLS HAVE THE FOLLOWING NAMES: 

SAVE - MACRO DEFINITION USED AT THE BEGINNING OF A SUBROUTINE TO 
SAVE THE GPR CONTENTS FOR LATER RESTORATION. 

PASS - MACRO DEFINITION USED AT THE END OF A SUBROUTINE TO RESTORE 
THE PREVIOUSLY SAVED GPR CONTENTS AND TO LEAVE THE CONTENTS 
OF THE SPECIFIED GPR(S) INTACT (NOT RESTORED"). 

PREG05 - SUBROUTINE WHICH IS CALLED FROM THE SAVE AND PASS MACRO 

EXPANSIONS WHICH ACTUALLY PERFORMS THE ACTIONS ON THE GPRS. 

DURING A SUBROUTINE WHICH USES THESE GPR SAVE ROUTINES THE VALUES 
OF THE GPRS ARE STORED ON THE STACK IN THE FOLLOUING STACK FRAME: 



SP 


-* RET PC INTO PREGOS ROUTINE. 


SP»2 


-> GPR RO CONTENTS. 


SP»4 


-> GPR Rl CONTENTS. 


SPf6 


> GPR R2 CONTENTS. 


SP*8 


-'• GPR R5 CONTENTS. 


SP»10 


-■> GPR R4 CONTENTS. 


SP*12 


-> GPR R5 CONTENTS. 


SP*14 


-> RET PC INTO CALLER OF SUB' TNE 



WHICH CALLED PREGOS 



WORDS OF STACK OVERHEAD. 
USED IN "STRAIGHT LINE CODE" 
IN ANY OoE, AFTER THE 
BE RESTORED TO THE VALUES 
(EXCEPT FOR THE EXCEPTED, 



EACH LEVEL OF SUB' TNE CALLING USES 8 

THE SAVE AND PASS MACROS CAN ALSO BE 

TO SAVE AND RESTORE THE GPR VALUES. 

ISSUING OF A PASS CALL THE GPRS WILL 

THE> HAD PRIOR TO THE LAST SAVE CALL 

OR P/tSSED INTACT, GPRS SPECIFIED AS PARAMETERS TO THE PASS CALL) 

AND THE SP WILL ALSO BE RESTORED TO ,"S CONOITION BEFORE THE LAST 

SAVE CALL. THE PROGRAMMER MUST BE SURE THAT THE SP HAS THE SAME 

VALUE WHEN THV PASS MACRO IS CALLED AS IT HAD IMMEDIATELY AFTER 

THP SAVt MAU<0 WAS CALLED. 

************* ******** *******♦♦********♦*♦*****♦%♦♦♦**♦***♦******♦* **********4 



>T 
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SEQ 36 



148S 




I486 




148/ 




1488 




1489 




14QO 




1491 




149*? 


000036 


1495 


000016 


1494 


000014 


149 r > 


00001,? 


1496 


000010 


149/ 


000006 


14^8 


000004 


1499 


oooooa 



SBTTL GPR FRAME ACCESS EQUATES 
I ♦ » » 

{EQUATES 
1 OFFSETS 
jHOUUNE 
j - - - 



THAT ALLOW ACCESS TO THE STACK FRAME. THESt ARE THE 
INTO THE STACK FOR REGISTERS SAVED DURING THE PREG05 



I.PCSLT-- 
PCSLOT-- 
R5SL0T»" 
R4SL0T=- 
R3SL0T-- 
RPSLOT- < 
R1SL0T-* 
ROSLOT== 



36 

16 

14 

I? 

10 

6 

4 

d 



, OFFSET 


FOR 


LAST 


RETURN 


PC 


j OFFSET 


FOR 


RETURN 


PC. 




j OFFSET 


FOR 


R5. 








j 01 FSET 


FOR 


R4. 








{OFFSET 


FOR 


R3. 








iOFFSET 


FOR 


Re?. 








{OFFSET 


FOR 


Rl. 








{OFFSET 


FOR 


RO. 









i.3 
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GLOBAL MACRO DEFINITION - SAVE - 

1501 .SBTTL GLOBAL MACRO DEFINITION - SAVE ■ 

150c* ;*****************************************♦*»***********»********************<.* 

150? j* THIS MACRO IS USED AT THE BEGINNING OF A SUBROUTINfc TO SAVE THE 

1504 }*■ CONTENTS OF THE GPRS RO THRU R5 . 

1505 j* 

1506 }♦ INPUTS: SP UNCHANGED SINCE SUBROUTINE WAS ENTERED 

150 7 i* R5SL.0T - OFFSET TO STACK SLOT FOR R5 (EQUATED TO 14 OCTAL) 

1508 {* 

1509 ;♦ OUTPUTS: GPR SAVE AREA ON THE STACK IS LOADED WITH THE CONTENTS OF GPRS 

1510 5* TOP OF STACK - LOADED WITH THE RETURN ADDRESS INTO PREG05 

1511 5* 

151c 1 :* CALLING SEQUENCE: SAVE 

1513 j* 

1514 ;♦ COMMENTS: NO ARGUMENTS ARE ALLOWED. 

1515 j* THE PASS MACRO SHOULD BE CALLED TO RESTORE THE GPR VALUES, 
15U> i* 

151/ I* SUBORDINATE ROUTINES CALLFD: PREC05. 

1518 | ++**+++*++*+*+++****++++*+++*+*++*++*+*****++++**+*****************++*** ' 

1519 

1W0 .MACRO SAVE 

1M1 .LIST 

15?.? J$R R5.PREG05 jCALL REGISTER SAV'c SUBRT. 

1525 .NLIST 

1524 .ENDM SAVE 



25 
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SEQ 38 



1526 
1527 
1528 

1529 

1530 

1531 

1532 

1533 

1534 

1535 

1536 

153? 

1538 

1539 

1540 

1541 

1542 

154 3 

1544 

1545 

1546 

154 7 

154ft 

1549 

1550 

1551 

1552 

1553 

1554 

1555 

1556 

1557 

1558 

1559 

1560 

1561 

1562 

1563 

1564 

1565 

1566 

1567 

1568 

1569 

15/0 

157 3 

15/2 

1573 



SBTTL GLOBAL MACRO DEFINITION - PASS - 

*+* + ±m + m, + + *m, + + m + ****4.*. + + *++4.**. +++* + + **. + + + + + + + ^ + *** + + + + + + + +, + + ** + * + + + * + + 



;♦ 
i* 
;♦ 

+ 
* 

* 
+ 

+ 
+ 
* 
* 

* 

* 

1* 
5* 
i* 

;♦ 

;* 

; * 
J* 
J* 

;* 
1 + 

5* 

: * 



THIS MACRO IS USED IN CONJUNCTION WITH THF SAVE 
CALLED AT END OF A SUBROUTINE TO PASS PARAMETERS 
CALLING ROUTINE BY ALTERING THE GPR SAVE AREA ON 
RETURNING TO PREG05 TO RESTORE THE GPRS TO THEIR 



MACRO. IT IS 
IN GPRS BACK TO THE 
THE STACK AND THEN 
SAVED VALUES. 



INPUTS; 



OUTPUTS 



ONLY ALLOWED ARGUMENTS ARE "RO" THRU "R5". 
ROSLOT THRU R5SL0T MUST BE EQUATED TO THEIR RESPECTIVE- 
SLOT OrTSETS BEFORE CP .LING THIS MACRO. 



GPR SAVE 



THE GPR VALUES ARE PUT IN THEIR RESPECTIVE SLOTS ON THE STACK 



CALLING SEQUENCE 



PASS 



R0.R1, 



COMMENTS; 



COMBINATION OF GPR ARGUMENTS MAY 
EXAMPLE, THE FOLLOWING ARE LEGAL 
PASS Rl 
PASS R4.R0.R2 
GPRS LISTED AS ARGUMENTS WILL BE 
CALLING ROUTINE, ALL OTHER GPRS WILL 
THE SP MUST BE AT ITS ORIGINAL VALUE 



ANY 
FOR 



THE 



BE LISTED IN ANY ORDER. 



PASSED INTACT TO THE 

BE RESTORED, 

WHEN PASS IS CALLED. 



THE 



IN 


STACK 


SLOT. 


IN 


STACK 


SLOT. 


TO 


PREG05 SUBRT 


RESTORED 


TO 


AND R3 





MACRO CALL 

PASS RO R3 
EXPANDS INTO THE FOLLOWING ASSEMBLY CODE: 

MOV RO.ROSLOT(SP) ;PUT RO 

MOV R5.R3SLOTCSP) ;PUT R3 

JSR PC.Q(SP)* {RETURN 

IN THIS EXAMPLE GPRS Rl, R2, R4 , AND R5 WILL BE 

THEIR VALUES CONTAINED IN THE STACK FRAME AND RO 

WILL BE LEFT AT THEIR VALUES PRIOR TO THIS PASS CALL. 

SUBORDINATE ROUTINES CALLED: CPREGRT - I ABEl WITHIN PREG05. VALUE ON STACK.) 

. ********+*++********♦*+* ****** + + * + * + **** + + * + * + + **+,* + *+*.* ********************** 

.MACRO PASS A.B.C.D.E.F 
,IRP X,<A,BiC.D.E,F> 

.IF NB.X 
.LIST 

MOV X.X'SLOT(SP) 

.NLIST 
.ENDC 
.ENDM 
.LIST 

JSR PC»8(SP)f 
.NLIST 
.ENDM PASS 



;PUT X IN STACK SLOT. 



;RETURN TO PREG05 SUBRT 



N3 
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SEQ 39 



1576 

1577 

15 78 

1579 

1580 

1581 

1582 

1585 

1584 

1585 

1586 

1587 

1588 

1589 

1590 

1591 

1592 

1595 

1594 

1595 

1596 

1597 

1598 

1599 

1600 

1601 

1602 

1603 

1604 

1605 

1606 

1607 

1608 

1609 

1610 

1611 

1612 

1615 

1614 

1615 

1616 

1617 

1618 

1619 

1620 

1621 

1622 

1623 

1624 

1625 

1626 

16d7 



0037/6 

0037/6 
004000 
004002 
004004 
004006 
004010 
004012 



004020 
004022 
004024 
004026 
004030 
004032 



SBTTL GLOBAL SUBROUTINE - PREG05 - 

****** •« *********************************************** ******* ***************** 

* PRESERVE REGISTERS RO THROUGH R5 FOR SUBROUTINE CALLS. 
♦ 

* INPUTS: THE RETURN ADDRESS BACK INTO THE CALLING HUUTINE MUST BE IN 

* GPR R5. (I.E.- MACROS USE "JSR R5.PREG05".) 
* 

* OUTPUTS; REGISTERS RO THROUGH R5 ARE SAVED ON THE STACK. 
* 

♦CALLING SEQUENCE: SAVE _ {MACRO EXPANSION CALLS PREG05. 

* 

* 

* 

♦COMMENTS: 

* 
* 
* 

* 
* 
* 

* 

♦SUBORDINATE ROUTINES CALLED: 
****+*************************************♦♦*♦♦♦♦♦♦*♦♦♦♦♦♦♦♦♦♦♦♦*♦♦♦♦♦♦***♦*** 



[SUBROUTINE CODE].. . 

PASS {MACRO EXPANSION RECALLS PREG05. 

THIS ROUTINE IS RE-ENTRANT. 

PARAMETERS MAY BE PASSEO OUT OF A SUBROUTINE BY MODIFYING THE 

REGISTER SAVE AREA ON THE STACK. USE THE PASS GPRN MACRO 

TO RETURN GPR VALUES INTACT. 

USE THE RNSLOT OFFSETS FROM THE SP TO PASS OTHER PARAMETERS. 

[EXAMPLE: MOV VALUE, ROSLOTC SF ) ] 

MAKE SURE THE SP IS AT ITS ORIGINAL VALUE WHEN YOU DO THIS. 

NONE. 



010446 

010346 
010246 
010146 
010046 
010546 
016605 



PPEG05: 



000014 



004016 004736 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

JSR 



} R5 HAS BEEN LOADED ON THE STACK BY THE SUBROUTINE CALL 

R4, (SP) {SAVE R4 

R3.-CSP) sSAVE R3 

R2. (SP) {SAVE R2 

Rl.-(SP) jSAVE Rl 

RO. -(SP) jSAVE RO 

R5, -(SP) ;PUSH RETURN 
R5SL0T(SP),R5 

PC,a(SP)» 



PC ON TOP OF STACK 



[RESTORE R5 TO VALUE IT HAD BEFORE CALLS 

jCALL. THE SUBROUTINE AT THE" RETURN ADDRESS 
jFROM THE PREG05 CALL, PUTTING THE PRESENT 
jPC ON THE STACK AS A RETURN ADDRlSS INTO 
{THIS (PREG05) ROUTINE, 



012605 
012600 
012601 
012002 
0126J3 
012f 04 



THE FOLLOWING CODE IS EXECUTED WHEN THE CALLING ROUTINE DOES A 
"RETURN" [JSR PC.5KSP)*) USING THE PC DEPOSITED ON THE STACK ABOVE 



PC IN R5. 



PrtEGRT:: MOV 


(SP)*,R5 


{PUT RETURN 


MOV 


( SP ) ♦ . RO 


jRESTORE RO 


MOV 


(SP)».R1 


jRESTORE Rl 


MOV 


( SP ) ♦ , R2 


j RESTORE R2 


MOV 


(SP)»,R^ 


j RESTORE R3 


MOV 


(SP)» t R4 


{RESTORE R4 



004054 00020b 



RTS 



R5 



{RETURN TO THE SUBROUTINE WHICH CALLED PREG05, 
iRfcSTQRING R5 IN THE PROCESS. 



?1 
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U 



16J9 








, 


165 7 










16 58 










165 1 * 










1M0 










1641 










164, 1 










1*4 5 










1644 










1645 










1646 










164 * 










1648 


004 056 
0C4056 










0C4056 


104 


no 


irs 




00404 l 


055 


061 


061 




004044 


000 






1*4^ 










165 r ^ 










1656 








J 


165' 








J 


1658 


004046 
004046 










004046 


104 


no 


U J 5 




C040M 


OS'S 


061 


061 




0O40S4 


040 


106 


l? f « 




00405 7 


11* 


105 


040 




00406..? 


W'4 


l.>* 


l.>4 




004065 


040 


l.-*0 


101 




0040 70 


uv 


124 


061 




004073 


000 







166? 



SBTTL GLOBAL TEXT SECTION 



THE GLOBAL TEXT SECTION CONTAINS FORMAT STAHMfNTS, 
MESSAGES, AND ASCII INFORMATION THAT ARE USED IN 
MORE THAN ONE TEST, 



NAMES OF DEVICES SUPPORTED Hi PROGRAM 
DEVHP -DHU-U> 



IDVTYPi : 



.Ascr/ /OHuii/ 



.tVtN 



i TEST DESCRIPTION 
Ot SCRIPT 



<UHU-U *'UNC 1ST PART1> 



LJDESC: l 



.A5CU /DHU-U KUNC TST PAR 



♦ EVEN 



.EVEN 



r>8 



6»°rW^c l rY^ 



: TST PARTI MACRO M1200 15-M/>R«4 09s l*. 



en 

PAGE 56 



*EU 41 



16 V 

16 \* 
lt,:9 

1680 

.681 
lb8i % 
1683 
1684 
1685 
1686 

1688 
168* 
16*0 
1**1 

lb*2 
16*3 

16*4 
1695 
16** 
16*7 
16*8 
169* 

l :oo 

1701 



.NL1ST BIN 



004074 
004101 
004154 
004^56 
004513 
004 545 
004407 
004451 
004546 
004615 
004664 
004710 
004777 
0050 74 
005150 
005.? 30 
0O5c>55 
005333 
005433 



EF0503 
EF0505 
EF 1401 
EF140? 
EF1601 
EF1602 
EF1603 
EF1604 
EF3001 
EF300? 
EF9006 
EK9010 
EF*016 
EF9017 
EF*018 

EF9301 
V *30c^ 
MfUNXT 



FORMAT STATEMENTS USED IN PRINT CALLS #*♦**♦♦*♦ 



PRUC ? - *0?Mf\(U)*U/ 



.ASCI/ /#T*N/ 

.ASCIZ /*A HD5KA ILLEGAL INTERRUPTS RECEIVED. #N/ 

.ASCI/ /*N#A ROM VERSION NUMBERS j PROC 1 ' *D2*A(D) 
.ASCIZ /*T*A ROM VERSION NLTOER #T*N/ 
.ASCIZ /*A *HA t TEST ABORTED *N/ 
.ASCIZ /*A EXPECTEO DATA; *06*A (0).*N/ 

.ASCIZ /KA ACTUAL DATA? *06*A (0).#N/ 

.ASCIZ /*A BAD BIT(S) IN DEVICE *T*A REGISTER FOR LINE *D?*A CD).*N/ 
.ASCIZ /«A EXPECTED OR CORRECT VALUE t *03#N/ 

.ASCIZ /*A ACTUAL OR MEASURED VALUE j *03*N/ 

.ASCIZ /*A *T*A #02*A(D)*N/ 

.ASCIZ /*A NUMBER OF ERRORS DETECTEO ON LINE. #D2*A 

.ASCIZ /*A UNEXPECTED *T#A FOR LINE *D2*A(D) IN UFO 
.ASCIZ /*A *T#A (WITH ERRUH FLAGS) IS *06*A(0)*N' 

.ASCII /*A *T*A IN SELFTEST CODE FIFO SLOT FOR LINE *02>' 
.ASCIZ /*A(D) AFTER RESET. #N/ 

.ASCIZ /*A *T*D?*A(D), BMP CODE REPORTED :*01«A(0)«N/ 
.ASCIZ /*A OVERFLOW OCCURRED (MORE THAN 31 BMP CODES FOUND 
.ASCIZ /*N*A TESTING L»4IT j#U4*N/ 
.EVEN 

.LIST BIN 



IS *D5*N' 
AFTER RESET t^N' 



IN UUtUt)»N/ 



D4 



&m°jm-hkm 
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1:10 
I'll 

in;: 

1?13 
1714 

i;i5 

1716 
1717 
1718 
171P 
1 720 



.NLIST BIN 



,+ + + ** + **<, GLOBAL ERROR MESSAGES ♦♦♦****♦ + *** 



1723 
1724 

1 725 
1726 
l-»7 
1728 
1729 
1730 
17M 
173? 

i ? .:3 

1731 

1735 
i73< 

\ t ■- / 
1 nj 
1 W- 

: ."'0 
l.'ii 
i •**■ 

:^:3 

l M..\ 
1 / «i . , 

\:\\, 

' f ■* * 
j /-I? 

17-Vy 

' . SO 
1751 
1 :52 
? ■'*<.< 
1 'h 1 

1 /':>.' 

1 .'f,0 

; *h\ 

i '"'.2 

*• ' r> r i 

: '-a 

1 ;!' lj 
i'"6o 



005464 
0054 70 
0054 75 
005501 
005517 
00552b 
005537 
005550 
005560 
005616 
005651 
005735 
006024 
006114 
o06\."»7 
006255 
000 ".46 
< % \)b*?.Q 
006505 
0;>6560 
Od c t'»;2 
0«W- 5 7 

o<; ;oir> 

00/077 
O0 71fc5 
00/241 
0CV32? 
00 74 15 
UC7505 
U07575 
007*3 7 
00 '727 
010017 
010111 
010?02 
010*45 
010335 
0104 ?5 
JI05J 7 

\ao6io 

0106*6 
010, '2* 
010766 
011022 

011055 
01114? 
01.1220 
<U1273 
011321 
011400 

011463 



DROOMG 
DR02HG 
DR04MG 
DR06MG 
DR10MG 
DR12MG 
0R14MG 
DR16MG 
EM0103 
EM0201 
EM0202 

EM0203 

EM0204 

EM0301: 
EM0302: 

t*H0303: 

EM0401: 
EMO402: 

EM0501 
EMO502: 

EM0525 
EM0526 
EMO601 
EM0602 

EMO603 

EM0701 
E MO 702 



EMO703: : 



EM0301 
EM0802 
EM0901 
EM0902 
EM1001 
EM1002 
EM1003 
EMU01 
EM1201 
EM1202 
FM1205 
EM1204 



.ASCIZ 

.ASCIZ 

.ASCI/ 

.ASCI/ 

.ASCI/ 

.ASCIZ 

.ASCIZ 

.ASCT7 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 



/CSR/ 

/RBI*'/ 

/I.PR/ 

/F IFOSIZE.STAT/ 

/LNCTRL' 

/TBUFTAD1/ 

/TBUTFAD2/ 

/TBUTFCT/ 

/DEVICE REGISTER 



ACCESS ERRORS/ 



/ MASTER RESET TEST TAILED./ 

/ MASTER RESET BIT DID NOT CLEAR AFTCR BOARD RESET./ 
/ WAITED 5 SECONDS. BIT DEFECTIVE OR FIRMWARE HUNG./ 

/ MASTER RESET BIT CLEAR IMMEDIATELY AFTER BOARD RESET./ 
/ BIT DEFECTIVE OR BOARD FIRMWARE ERROR./ 

\ MR BIT WENT CLEAR WITHIN 1/2 SECONO OF BOARD RESET. \ 
/ BIT OEFECTIVE OR SELFTEST WAS (INCORRECTLY) SKIPPED./ 

/MASTER RESET (SKIP SELFTEST) TEST FAILED./ 
/ MR BIT CLR WITHIN 10 MILISECONO AFTER BOARD RESET,/ 
/ BIT DEFECTIVE OR BOARD FIRMWARE ERROR./ 

\ MR BIT WENT CLEAR 1/5 TO 5 SECONDS AFTER RESET. \ 
/ SELFTEST DID NOT GET SKIPPED (SHOULD HAVE BEFN SKIPPED),/ 

/RBUF REGISTER RX CHARACTER FIELD TEST FAILED./ 
/ IMPROPER COOE FOUND IN RX FIFO AFTER OUT RESET./ 
/ EXPECTEO: SELFTEST COOE, ACTUAL; IMPROPER CODE./ 

/RBUF REGISTER ERROR FLAGS FIELD TEST FAILED/ 
/ RX ERROR FLAG(S) FOl.NO CLEAR ON SELFTEST CODE./ 
/ EXPECTED: ALL ERROR FLAGS SET, ACTUAL- FLAG(5) CLEAR,/ 

/ RX INTERRUPT(S) RECEIVED WITH RX INTERRUPTS DISABLED./ 
/ TX INTERRUPT(S) RECEIVED WITH TX INTERRUPTS DISABLED./ 
/CSR RX. DATA. AVAIL BIT TEST FAILED/ 

/ RX. DATA. AVAIL BIT FOUND CLEAR AFTER RESET COMPLETION.'' 
/ EXPECTED bIT TO BE SET FROM SELFTEST CODES IN F^FO. 

/ RX. DATA, AVAIL BIT COULD NOT BE CLEARED Br PURGING UFO.' 
/ 600 CHARS READ FROM FIFO WITHOUT R.D.A BIT CLEARING,' 

/RBUF RX. DATA. VALID BIT TEST FAILED' 

/ RX. DATA, VALID BIT FOUNO CLEAR AFTER RESET COMPLETION./ 
/ EXPECTED BIT TO BE SET FROh SELFTEST COOtS IN FIFO.-' 

/ RX. DATA. VALID BIT COULD NOT Bi CLFARED BY PURGING UFO./ 
/ 600 CHARS READ FROM FIFO WITHOUT R.D.V BIT CLEARING.' 

/RBUF RX. LINE. NUMBER FIELD TEST FAILED-' 
/ LINE NUMBER WRONG ON A SELFTEST CODE./ 
/CHECK FOR BMP COOES TEST FAILED/ 
/UNEXPECTED BMP COOES FOUND./ 
/SKIP SELF -TEST TEST FAILED/ 

/ SKIP SELF -TEST TOOK TOO LONG TO COMPLETE, 
/ SKiP SEIF-TEST COMPLETED TOO SOON. * 10 M! 

ESf f AILED/ 



50 MS./ 



/DIAGNOSTIC FAIL ( SKP SELFTFST) 

/SELF TEST TEST FAILED/ 

/ SEIF-TEST TOOK TOO LONG TO COMPLETE 
.ASCIZ \ SELF -Tf. ST COMPUTED TOO SOON, < 1/ 
.ASCIZ / SELF-TEST DIC NOT EXECUTE/ 



. > S MCUND5 
«? SECOND. \ 



50 
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SLQ 45 



' o l 



1 

1768 

1?69 

1770 

1/71 

1??2 
1773 
1 <'74 
17-."-. 
1776 
7 77 
".•78 



780 
781 

vns 

178* 

x 7&4 

1 785 

1786 

1787 

1788 

I 789 

1790 

1791 

1792 

1795 

1794 

?.70S 

1 796 

1797 

1798 

1/99 

1800 

J.HOi 

1802 

1.8C3 

1 80-i 

1805 

1806 

1 80 7 

3 806 

1809 

1810 

381] 

181c' 

1813 

1814 

1815 

1?10 

WW ? 

i«:b 

1819 
18 JO 

: ■*,-. l 

1H,'«: 
1825 



011517 

011543 

011576 

011635 

011674 

011762 

012035 

012107 

012122 

012135 

012147 

012155 

012203 

012221 

012304 

012360 

012443 

012517 

012602 

012652 

012725 

012772 

013030 

013073 

013131 

013222 

013310 

013404 

013467 

013526 

013622 

013673 

013752 

014044 

014127 

014223 

014262 

014 3:6 

014432 

014506 

014600 

014643 

014722 

015016 

015073 

015127 

015137 

015154 

015200 

015217 

015241 

015257 

015336 

015366 

015433 



EW.205 

EM1301 

EM130? 

EM1401 

EM1402 

EM1403 

FM1404 

EM1405 

EM1406 

FM1407 

EM1408 

EM1501 

EM1502 

EM1601 

EM1604 

EM1701 

EM1801 

EM1901 

EM2001 

EM2002 

EM2301 

EM2302 

EM2401 

EM2601 

EM2602 

KK2603 

EH2604 

EM2605 

EM2606 

EM2607 

EM2608 

EM2609 

E »126 10 

EM2611 

F.M2612 

EM3001 

EM3002 

EM3003 

EM30O4 

EM3005 

EM3101 

EM3102 

EM9014 

EH9017 

EM9018 
EM9019 
EM9020 
EM9022 
EM9023 
EM9024 
EM9301 
EM9302 
EM9303 
EM93Q4 



.ASCIZ / DIAG FAIL BIT BAD/ 
.ASCIZ /FAIL SELF-TEST TEST FAILED/ 
.ASCIZ / SELF-TEST ERROR REPORTING BAD/ 
.ASCIZ /ROM VERSION NUMBER TEST FAILED/ 

.ASCIZ / FIFO EMPTY, ONE OR MORE ROM VERSION NUMBERS MISSING/ 
.ASCIZ / ROM VERSION_NUMBER FOUND OUT OF SEQUENCE/ 
.ASCIZ / ONE OR MORE ROM VEP3I0N_NUMBERS MISSING/ 
,ASCIZ / PR0C„1/ 
. ASCIZ / PR0C_2' 
.ASCIZ /NOT FOUND/ 
.ASCIZ /FOUND/ 

.ASCIZ /CSR BIT 4 TEST TAILED/ 
.ASCIZ /CSR BIT 4 BAD/ 

.ASCIZ /TIMEOUT OCCURRED UAITING FOR MASTER RESET TO CLEAR/ 
.ASCIZ \DEVICE REGISTER WORD READ/WRITE TEST FAILED\ 
.ASCIZ \DEVICE REGISTER WORD READ/MOOIFY/WRITE TEST FAILED\ 
.ASCIZ \DEVICE REGISTER BYTE READ/WRITE TEST FAILEDN 
.ASCIZ \DEVICE REGISTER BYTE READ /MODIFY /WRITE TEST FAXLED\ 
.ASCIZ /DEVICE STAT REGISTER ID BIT TEST FAILED/ 
.ASCIZ /ID BIT BAD. EXPECTED; SET, ACTUAL: CLEAR,/ 
.ASCIZ /TX ENABLE (INACTIVE) BIT TEST FAILED/ 
.ASCIZ / TX.ENABLE BIT BAD ON LINE: / 
.ASCIZ /TX.. ENABLE (ACTIVE) BIT TEST FAILED/ 
.ASCIZ /RECEIVE INTERRUPT TEST FAILED/ 

.ASCIZ / NO RX INT GENERATED (DATA.VALID SET, RX INTS ENABLED)./ 
.ASCIZ ' NO RX INT GENERATED (NO COOES IN FIFO AFTER RESET)./ 
.ASCIZ / NO RX INT GENERATED (RX_DATA_AVAIL CLR, RX INTS ENABLED)./ 
.ASCIZ / RX INTERRUPT GENERATED WITH RX DATA AVAIL CLEAR./ 
.ASCIZ /TRANSMIT INTERRUPT TEST ERROR:/ 

.ASCIZ / TX ACTION SET REPEATEDLY AFTER BOARD RESET, NO DATA SENT./ 
.ASCIZ / TX ACTION STUCK SET AFTER BOARD RESET./ 
.ASCIZ / TX 'INTERRUPT GENERATED WITH TX, ACTION CLEAR./ 
.ASCIZ / NO TX INTERRUPT WITH TX.ACUON SET AND TX INTS ENABLED./ 
.ASCIZ / TX ACTION NOT SET AFTER CHARS SENT ON ALL LINES./ 
.ASCIZ / NO~RX INT GENERATED (RX.OATA AVAIL SET, RX INTS ENABLED)./ 
.ASCIZ /INTERRUPT BR LEVEL TEST FAILED/ 

.ASCIZ / NO RX DATA AVAIL FROM SELFTEST COOES IN FIFO AFTER RESET./ 
.ASCIZ / TX INTERRUPT GENERATED AT WRONG BR LEVEL:/ 
.ASCIZ / RX INTERRUPT GENERATED AT WRONG BR LEVEL:/ 
.ASCIZ / TX INTERRUPT GIVEN PREC^DENCF OVER SIMULTANEOUS RX INT,/ 
.ASCIZ /DIAGNOSTIC FIELD (BMP) TEST FAILED/ 
.ASCIZ / DIAGNOSTIC FIELD (BMP REQUEST) BAD ON LINE: / 
.ASCIZ /SUMMARY REPORTS FOR LINES WITH EXCESSIVE NUMBERS OF ERRORS*/ 
.ASCII / FIFO WILL NOT PURGE (DATA, VALID STUCK SET),/ 
.ASCIZ / REMAINOER OF TEST SKIPPED./ 
.ASCIZ /NO CODE/ 
.ASCIZ /NON-SELFTEST/ 
.ASCIZ /SELFTEST ERROR CODE/ 
.ASCIZ /DATA CHARACTER/ 
.ASCIZ /MODEM STATUS CODE/ 
.ASCIZ /SELFTEST CODE/ 

.ASCIZ /BMP CODES WERE REPORTED DURING 
.ASCIZ /BMP CODE FOUND IN TEST / 
.ASCIZ /THE LAST BMP CODE WAS * OUNQ IN Tt*jT ." 
.ASCIZ /UNEXPECTED BMP COQES FOUND DURING THIS PASS/ 
4 tVEN 

.LIST BIN 



THIS DIAGNOSTIC/ 



F4 

51 CJOHURO DHii-ll hUNC 1ST PARTI MACRO M1200 15-MAR-84 09:15 PAGE 38 SfcQ 44 

GLOOAi TFXT SECTION 

185? 

183-1 .SBTU. GLOBAL ER90R REPORT SECTION 

185S 

1M3*> j ♦ ♦ 

,35.* i THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS 

1558 j USED BY MORE THAN ONE TEST TO OUTPUT ADDITIONAL ERROR INFORMATION. PRINTS 

;8.V> s (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVICES. 

1840 i-- 



i? 



C/l'HrtU.) ohm 11 K'NC T5T PARTI 

GLOBAL i-PROR REPORTING ROUTINE 



G4 



MACRO M1200 15 MAR-84 
- ER01O1 - 



09*. 15 PAGE 39 



^EQ 45 



lrt-i" 

18*1 i 

18:. 
lfc*;.' 

1P4'< 
1P50 
18J < 
185 -> 
1BV- 
1854 
185:". 
18^o 
1*5 - 

1858 

18 SO 

l«fcO 

13*-) 

lite? 

18t> 

186'' 

186 ,: 

lrtbii 

18*. 
186.-t 
18o L "< 
18/0 

IP/: 

Id.-' 
18 '!* 

18 /-i 
IS."" 
18,'c 
lb ft 



18/8 
18.' J 

18*0 



188 3 



015510 
01S510 
(-15510 
015510 

015514 
015520 
015524 



"15526 
015532 
015534 
015534 
015540 
p 15544 
0)5546 
015550 
015554 
J 5560 
mi : ,5n? 

(J 1 5566 
0)55/? 

or»5/4 

0155/6 
01560? 
01560? 
015606 
i>lV>12 
ol5»il4 
0l5bl6 



004567 

012700 

046700 
001036 



03? 705 
001410 

01? 746 

012746 
010600 
104414 
062706 
032705 
001410 

01? 746 
Oi;V46 
OlOt>00 
1C4414 
062706 

012/46 
012/46 
010600 

104415 
062/06 



000100 
164500 



000001 



015626 
000001 



000004 
000002 



015704 
000001 



000004 

015/63 

000001 



000004 



.SBTTL GLOBAL ERROR REPORTING ROUTINE • ER0101 - 

;************************. ******************************************+*****+***** 

j* THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
INFORMATION IF* AN ERROR IS DETECTED IN TEST 1 (REGISTER ADDRESS 

ACCESS TEST). IF THE "EXTENDED ERROR INFO" OPTION HAS BEEN SELECTED 
THEN THIS SUBROUTINE WILL REPORT THE TYPE OF ACCESS (READ OR WRITE OR 
BOTH) WHICH CAUSED A BUS TIME-OUT TRAP (004 TRAP). A MESSAGE INDICATING 
THAT THE DHU MAY BE AT THE WRONG UNIBUS ADDRESS IS ALSO PRINTED. 



; * 

5 ♦ 

;* 
I* 
;* 
j * 

{♦ 

* 

* 
* 

* 

* 
* 
* 
* 



INPUTS: 



OUTPUTS 



R5 - 



ERROR 
IF 

IF 



FLAG WORD. 

8IT IS SET, A 

1 IS SET, A 



[7T 



READ ERROR OCCUKED. 
WRITE ERROR OCCURED. 



MESSAGES ARE PRINTED AT THE OPERATOR CONSOLE 



CALLING SEQUENCE: 



COMMENTS: 



INCLUDE THE LABEL "ER0101" 
PARAMETER IN THE DRS ERROR 



AS THE MESSAGE POINTER 
REPORT MACRO CALL. 



SUBORDINATE ROUTINES USED: NONE 



•A**************************************************************************** 



BGNMSG ER0101 
SAVE 



JSR 



MOV 
BIC 
BNE 



0BIT06.R0 

OPTION. RO 
6$ 



}5AVE THE GPR 
R5.PREG05 



l SET 



FR0101: : 

CONTENTS. 

{CALL REGISTER SAVE SUBRT 



UP THE BIT MAP FOR REPORT EXT'D ERROR INFO 1 
; TRY AND CLEAR THE El AG. 
jEXIT IF OPTION NOT SELECTED. 



j REPORT 



EXTENDED ERROR INFONATION 



BIT 0UIT0.R5 
BEQ ?i 
PRINTB 0MSG1 



I TEST FOR READ ERROR. 

r>KIP READ ERROR M5G IF NO READ ERROR 

; PRINT READ ERROR MESSAGE. 

MOV 

MOV 

MOV 

TRAP 

ADD 



?.% 



hit onni.R5 

BEQ 4$ 

PRINTB OM5G2 



s TEST FOR WRITE FRROR, 

i_M IP WRITE ERROR M5G U NU 

jPRINT WRITE ERROR MESSAGE. 



0MSG1. ISP) 
#1, C5P) 
SP.RO 

CJPNTB 
04, SP 



WRITE ERROR. 

MOV 

MOV 

MOV 

TRAP 

ADD 



0MSG2. 
01, (.5 

SP.HO 
CtPNTfl 
04 . SP 



•tSP-) 



4$ 



PRINTX 0MSG3 



(SUGGEST THAT DHU MAi UE AT WRONG ADDRE' 

MOV 

MOV 
MOV 
TRAP 

ADD 



OH' 

01 

-iP 



1G3 

RO 



P l 



SP^ 



CSPNT 



H4 



>3 



C-'Ol-MiO UttU - II I UNC 1ST PARTI 
GLOfcm. -RhOH REPORTING ROUTINE 



lass 



Sis* 4 



UUi6 



1**7 



01562,? 
G 1 5622 
n 15621 
015624 
015624 

015626 
015631 
01563^ 
01563/ 
015642 
015645 
0156SO 
015653 
J 565b 
015661 
015664 
01566 7 

or>6 7? 

01i)675» 

015700 

015703 

015704 

015707 

015712 

015715 

015720 

015723 

015726 

1 5731 

015734 

015737 

015/42 

015745 

015/50 

015753 

v'15756 

0!5/61 

01576 3 

015/66 

015//1 

015 7 74 

015/// 

( »16002 

016005 

016010 

016013 

016016 

i '".02 1 

1 6024 

OloOc' / 

016032 

016055 

016040 



004736 



104423 

045 

125 

124 

105 

125 

124 

120 

101 

105 

102 

122 

104 

124 

115 

056 

000 

045 

125 

124 

105 

125 

124 

120 

101 

105 

102 

127 

124 

101 

105 

124 

116 

045 

110 

115 

040 

040 

040 

105 

122 

10/ 

116 

125 

101 

122 

123 

116 

000 



101 
123 
111 
055 
124 
122 
0*0 
125 
104 
131 
105 
040 
.124 
120 
045 

101 

123 

111 

055 

124 

122 

040 

125 

104 

131 

122 

105 

124 

115 

056 

000 

101 

125 

101 

102 

101 

124 

040 

117 

040 

111 

123 

104 

105 

056 

045 



MACRO N1200 1! 



65: 



102 
040 
115 
11/ 
040 
101 
103 
123 
040 
040 
HI 
040 
124 
120 
045 

104 
040 
131 
105 
124 
110 
12/ 
116 
125 
102 
040 
104 
123 
045 
116 



-MAR-fl4 0^:15 
,1 - 

PASS 
ENDMSU 



PAGE 39-1 



J5R 



IEQ 46 



jRESlORt THE GPR CONTENTS. 

PC,QCSP)f j RE TURN TO PREG05 SUBRT 



1.10002: 



TRAP C*MSG 



102 MSGli 

040 
115 
117 
040 
101 
103 
123 
040 
040 
101 
101 
105 
124 
116 



.ASCI/ /KABUS TIME -OUT TRAP CAUSED BY READ ATTEMPT. KN/ 



MSG2: 



ASCI/ /*ABUS TIME-OUT TRAP CAUSED BY WRITE ATTEMPT t *N/ 



MSG3 



ASCIZ /KADHU MAY UL AT THE WRUNG UN1UU5 ADDRESS ^N*N<> 



ltiGS 



.EVEN 



.14 



CJOHOviO DHU-11 KINC TST PARU 
GLOBAL ERROR REPORTING ROUTINE 

lttvi 

1 ft l >2 

] H\*4 

1 Vtrt 

1 *6)M 

1900 
1^01. 
1 90 •"' 
1905. 

r-»os 

1907 
.1 l »0;i 
l ,J O f » 

*') 10 
l'Ul 
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SEQ 4 7 



1914 

i<-i6 

1 HP 
1'VU 
19.V. 

] 924 

3 925 



1926 



1927 
l c *2tt 

192 ' 



016042 
01604? 
01 604 a 

016042 

016046 
01**052 
016056 

016060 
C 1 6C6? 
016064 

o 16066 
] 6066 
016070 
0160/4 
1-16100 
016102 
016104 
0)6110 
016110 
('161 lr' 
016116 
016122 
016124 
016126 

016132 
016152 

016154 

i >161 54 
016154 



012700 
C46700 
001025 

010102 
105722 
001576 



010146 
012746 
012746 
010600 
104414 
062"? 06 

010246 

012/46 
012746 
010600 
104414 
062 706 



004 736 



104425 



.5BTTL GLOBAL ERROR REPORTING ROUTINE - ER0201 

!* THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS 2 CONTIGUOUS 

* ASCU ERROR MESSAGES, THE ADDRESS OF THE FIRST MESSAGE IS PASSED 

* AS AN INPUT PARAMETER AND THE ADDRESS Of THE SECOND IS FOUND Br 

•v SEARCHING FOR THE END OF THE FIRST MESSAGE. THE MESSAGES ARE ONLY 

* PRINTED IF EXT'D ERROR REPORTING HAS BEEN REQUESTED. 



Rl ADDRESS OF THE FIRST MESSAGE TO PRINT. 

A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 



* INPUTS: 

* OUTPUTS: 

* 

* CALLING SEQUENCE: LOAD THE ADDRESS OF THE FIRST MESSAGE IN Rl. 

* INCLUDE THE LABEL "ER0201" AS THF MESSAGE POINTER 

* PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CAu . 



THE MESSAGE I? PRINTED AS BASIC ERROR INFORMATION. 

THE SECOND MESSAGE SHOULD FOLLOW THE FIRST ONE IN THE PROGRAM 

MEMORY. EACH MESSAGE SHOULD BE DEFINED USING .ASCI/ 



* COMMENTS: 

* 

* SUBORDINATE ROUTINtS USED: NONE. 



BGNMSU ER0201 
SAVE 



004567 165750 



JSR 



000100 
164146 



MOV 
BIC 
BNE 

MOV 
1STB 
BNE 



0tUT06.R0 
OPT ION, RO 
4 , 

R1.R2 
(R2)» 

2* 



ER0201: : 
jSAVf. THE GPR CONTENTS. 
R5.PREG05 j CALL REGISTER SAVE SUH«T. 

}TRt TO CLEAR THE 

} EXT'D ERROR REPORTING FLAG 

lEXIT IF FLAG NOT SET. 



sCheck urn a /two fun (END OF Mf SSAlifc) 

j I OOP UNTIL NtXT M( SSAGf- IS FOUND. 



PRINTB 0EF0505.R1 



jPRINT THE FIRST MESSAGE. 



004 74 
000002 



000006 



0040/4 
000002 



000006 



PRINTB 0EF0505.R2 



, PR INT THE SECOND MESSAGE 



MOV 


R I , ( -P N 




MOV 


OFF 050 5, ■ 


LSP*) 


MOV 


#2 . (. SP ) 




hO\ 


SP.RO 




TR;H> 


C VPN IB 




ADD 


06. SP 




MOV 


R2, ■ t ;p> 




MOv 


3EF050*, 


( SP t 


MOV 


c.\ i-;p^ 




MOV 


52, WO 




TRAP 


CJPNTB 




ADD 


9* , SP 





41 



PA! 



ENDMSb 



JSR 



;R* 5 TORI THE 9PR CONSENT 

PC . Mi 'jP 1 • 



i HE TURN TO PREU05 SL'BR?. 
L 1000<: 



TRAP 



C$M' 



J4 



•>.> 



"*.. f>KUtto 


DHU U 


UNC 1ST 


PARTI 


CLOr.Al. ERROR REPORTING 


ROUTINE 


l l *52 








195/. 








1^3 4 








1^55 








195'.. 








195/ 








;<)5A 








1959 








I94i- 








3 94 1 








194 J 








19Vi 








'94 i 








1 94 S 








194b 








1 <?*♦ .' 








x JI:l 








1^'i 








19V> 








19M 


Olb 15b 
01615b 






1 9 p .f? 








!'>■* 


0!0>36 


01.7700 


000100 


1954 


'JUU42 


046 700 


164056 


195\> 


C16146 


coron 




1956 








195/ 








1950 


01*- 150 








016150 


0101 4o 






0161V-* 


012/46 


004074 




016156 


01^746 


000002 




o:6i62 


010600 






lb j 64 


104414 






01616^ 


062706 


000006 


m f i9 








I960 


Olbl V 

oh..'/; 1 

01617c? 


104425 
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SEU 48 



SBTTl. GLOBAL ERROR REPORTING ROUTINE - ER0505 

#♦**#* + ♦*******♦#*#*******.***«**###********##*#♦#***♦***#*#***»«*****■*»******* 

♦ THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS AN ADOITIONAL ERROR 

♦ MESSAGE WHOSE ADDRESS IS PASSED AS AN INPUT PARAMETER, PROVIDED 

♦ EXTENDED ERROR REPORTING HAS BEEN REQUESTED. 
* 

♦ INPUTS: Rl - ADDRESS OF THE MESSAGE TO PRINT. 

♦ OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 

* 

♦ CALLING SEQUENCE: LOAD THE ADDRESS OF THE MESSAGE IN Rl. 

♦ INCLUDE THE LABEL "ERO503" AS THE MESSAGE POINTER 

♦ PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
♦ 

♦ COMMENTS: THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION, 

♦ SUBORDINATE ROUTINES USED: NONE. 

; ******************** ***************+*********+*++*********+*+*♦+*♦*♦♦**+***+*+ 



BGNMSG ER0505 



ER0S05: : 



MOV 

BIC 
BNE 



00IT06.R0 
OPTION, RO 
2* 



PRINTB 0EF05O5.R1 



j TRY TO CLEAR THE 

lEXT'D ERROR REPORTING FLAG 

{EXIT IF HAG NOT SET. 



I PRINT THE MESSAGE. 



2$: 



ENDMSG 



L 10004; 



MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 



TRAP 



Rl, (SP) 
OEF0503, -ISP) 
02 . ( SP ) 

SP.RO 
CiPNTU 
06, SP 



CSMSG 



I<4 



56 



l/DHUHO DHU 11 f UNC TST PARTI 
;LOBAl ERROR REPORTING ROUTINE 



1965 
1964 
196S 

196b 

196; 

1968 
1969 

19 ;o 

1971 
19 72 

19 75 
.19 74 
19 7 l j 
1976 
19 7 7 
1978 
19 79 
1980 
1981 

1982 



1983 
1984 
1985 
1986 
198 7 

i9ee 



1989 



19 SO 
1991 



016174 
016174 

016174 

016200 
016204 

016206 

016206 
016210 
016214 
016220 
016222 
016224 
016230 
016230 
016232 
016236 
016242 
016244 
016246 

016252 
01621.2 

016252 



012 700 
046700 
001022 



010146 
012746 
012746 
010600 
104414 
062 706 

010246 

012746 
012746 
010600 
104415 
062706 



104423 



MACRO M1200 15 MAR 84 09:15 PAGE 42 
- ER0504 - 

.SBTTL. GLOBAL ERROR REPORTING ROUTINE - ER0504 

{ * THIS 15 AN ERROR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
t* MESSAGES WHEN ILLEGAL INTERRUPTS ARE RECEIVED. 

J* 

;♦ INPUTS: Rl - ADDRESS OF THE MESSAGE TO PRINT. 
, ♦ R2 - NUMBER OF ILLEGAL INTERRUPTS RECEIVED. 

* 

♦ OUTPUTS: MESSAGESS ARE PRINTED AT THE OPERATOR CONSOLE. 

* 

♦ CALLING SEQUENCE: LGAD THE ADDRESS OF THE MESSAGE IN Rl. 

* LOAD THE NUMBER OF ILL** AL INTS IN R2 . 

* INCLUDE THE LABEL "V' r A" AS THE MESSAGE POINTER 
:♦ PARAMETER IN THE DIAG ^ER ERROR REPORT MACRO CALL. 

{* 

j* COMMENTS: 

i + 

5* SUBORDINATE ROUTINES USED: NONE. 

j+* + ** + *********** + 4.*** + + *********# + ****+ + * + *+*.*+ + + + + + * * + + * + + ** + * + *+* + + *+ + + *++ + 



SEQ 49 



BGNMSG ER0504 



ER0504: : 



000100 
164020 



004074 
000002 



000006 



004101 
000002 



000006 



MOV 


4GIT06.R0 


BIC 


OPTION, RO 


BNE 


?* 



j TRY TO CLEAR THE 

jF.XT'O ERROR REPORTING FLAG 

{EXIT IF FLAG NOT SET. 



PRINTB V?EF0503,R1 



PRINTX 4EF0505»R2 



2i: 



ENDMSG 



jPRINT 


THE FIRST LINE OF THE MESSAGE. 








MOV 


Rl. -(SP) 






MOV 


&EF0503, - 


(SP) 




MOV 


02, (SP) 






MOV 


SP.RO 






TRAP 


C5PNTB 






ADD 


♦6.SP 




jPRlNr 


THE NUMUlR CF INT 5 RECEIVED. 








MOV 


R2. -(SP) 






MOV 


#fcrosor>. 


(SP) 




MOV 


02, (SP) 






MOV 


SP.RO 






TRAP 


C5PNTX 






ADD 


06 , SP 






L10005: 







TRAP 



CSMSG 



37 



C/DHUHO DHU-11 K»NC IsT PARTI 
GLOBAL ERROR REPORTING ROUTINE 



1993 

1994 
1 995 
1996 

199,* 
1998 
1999 
2000 
5001 

c'oo;-? 

.7005 
5004 

2005 
2006 
5007 

5008 

500^ 

5010 
5011 
5015 
2013 
50 14 
5015 
501ft 
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SEQ 50 



5017 
5016 
5019 
5050 
5051 
5055 



5053 
5054 
5025 
5056 
505/ 
5028 
2029 
5030 
5031 
2032 
2033 
5034 
2035 
2036 

203 7 
2038 
20 39 

204 
204 1 

2042 



016254 
016554 

016554 

016260 
016264 

016266 
016266 
016270 
0162/4 
016300 
016302 
016304 



012700 
046/00 
001053 



010146 
012746 
012746 
010600 
104414 
062706 



016310 
016314 
016320 
016324 
016326 
016330 
016334 

016340 
016344 
016350 
016355 
016354 
016360 
016364 



012705 
012701 
012702 
120305 
001402 
012702 
004 767 

012701 

012702 
120405 
001402 
012/05 
004 767 

000413 



000100 
163740 



004074 
000002 



000006 



000143 
012107 
012135 



01514/ 

000026 

015122 
015135 



01214/ 
000005 



TTL GLOBAL ERROR REPORTING ROUTINE 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
INFORMATION (If REQUESTED DURING THE SOFTWARE QUESTIONS) IF AN ERROR 
IS DETECTED IN THE ROM VERSION TEST. THIS SUBROUTINE ANAi YSES THF INPUT 
PARAMETERS WHICH CONTAIN THE ROM VERSION NUMBERS FOR PROC 1 AND PR0C..5 
AND REPORTS THE APPROPRIATE ERROR MESSAGE TO THE OPERATOR. 

Rl - CONTAINS THE ADDRESS OF THE FIRST MESSAGE TO BE REPORTED. 
R3 * CONTAINS THE ROM VERSION NUMBER OF PROC 1. 
R4 CONTAINS THE ROM VERSION NUMBER OF PR0C..5. 



SB 
** 

♦ 

* 
+ 
♦ INPUTS} 

* 

* 
+ 
* 

* 



ER1401 



OUTPUTS: 



BASIC AND EXTENDED ERROR MESSAGES ARE REPORTED AT THE 
OPERATORS CONSOLE. 



CALLING SEQUENCE: 



COMMENTS: 



INCLUDE THE LABEL "ER1401" AS THE MESSAGE POINTER 
PARAMETER IN THE DRS ERROR REPORT MACRO CALL. 



SUBORDINATE ROUTINES USED: NONE. 

A*************************************************************************** 



BGNMSG ER1401 



ER1401: 



MOV 
BIC 
BNE 



OBITOft.R'J 

OPTION.RO 
60$ 



PRINTB 0EFO5O3.R1 



j TRY TO CLEAR THE 

{EXT'O ERROR REPORTING FLAG 

lEXIT IF FLAG NOT SET. 



{REPORT THE ERROR 



MESSAGE PASSED IN. 




MOV 


Rl, CSP) 


MOV 


0EFOSO3. (SP) 


MOV 


05. (SP) 


MOV 


SP.PO 


TRAP 


CJPNTB 


ADD 


06»SP 



DETERMINE WHICH ROM VERSION NUMBER(S) ARE MISSING. 



5$j 



Aij 



MOV 


099, ,R5 




M0\' 


OEM 14 05 


Rl 


MOV 


OF.M1407 


R5 


CMPB 


R3.R5 




BEU 


5$ 




MOV 


4FM140B 


R5 


JSR 


PC ,50$ 




MOV 


OEM 14 06 


Rl 


MOV 


OEM1407 


R5 


CMPB 


R4,R5 




BFQ 


4* 




MOV 


#F.M140e 


t R2 


JSR 


PC.^Q* 




BR 


605 





jGET INVALID ROM NUMBER. 

(SELECl PR0C1 MESSAGE. 

iSFLECT THF. "NOT FOUND" MFSSAGE . 

{CHECK PROC 1 ROM VERSION NUMBER. 
jGO REPORT PROC 1 CODE NOT FOUND 
iSELFCT "FOUND" MESSAGE. 
jGO REPORT MESSAGE. 

j SELECT PROC .2 MESSAGl . 

I SELECT THE "NOT FOUND" ME SSAGI . 

(CHECK PROC 2 ROM VERSION NUMBER 

j GO REPORT PROC 5 CODF NOT FOUND 

{SELECT "FQUND" MESSAGE, 

iGU RfcPURT THE MESSAGE. 

}EXXT> 



38 
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SEQ 51 



2043 
2044 



2045 
2046 



016366 
016366 

016370 
016372 
016376 
016402 
016404 
016406 
016412 
016414 
016414 
016414 



010246 
010146 
012746 
012746 
010600 
104415 
062706 
000207 



104423 



004256 
000003 



000010 



50$ 



PRINTX M£F1402,R1,R2 {REPORT THE MESSAGE 



60$ 



RTS 
ENDMSG 



PC 



} RE TURN. 





MOV 


RP. -CSP) 




MOV 


Rl. (SP) 




MOV 


♦EF1402, 




MOV 


01, -CSP) 




MOV 


SP.RO 




TRAP 


C$PNTX 




ADD 


ftlO.SP 


L 10006: 







-CSP) 



TRAP 



CSM5G 



N4 
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2046 
2049 
2050 

2051 
2052 
2053 
2054 
2055 
2056 
2057 
2058 
2059 
2060 
2061 
2062 
2063 
2064 
2065 
2066 
2067 
2068 
2069 
2070 
2071 
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SEU 52 



20 72 
2073 
2074 
2075 
20^6 
20/7 
20 78 
20 79 
2080 



016416 
016416 

016416 
016422 
016426 



012700 
0467CO 
001036 



2081 



?082 



2083 



016434 
016434 
016436 
016440 
016444 
016450 
016452 
016454 
016460 
016460 
016462 
016466 
016472 
0164 74 
016476 
016502 
016502 
016504 
016510 
016514 
016516 
016520 
016524 
016524 



010546 
010446 
012746 
012746 
010600 
104414 
062706 

010246 
012746 
012746 
010600 
104415 
062706 

010146 
012746 
012/46 
010600 
104415 
062706 



SBTTL GLOBAL ERROR REPORTING ROUTINE 



- ER1601 



▼ iiTf nn r-r\r\r\n nrnnnTTur n mnnnTTitcr iiut."u nntnTr nnrvTTT/«irti 



**4i**i* ***** 



THIS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
INFORMATION IF AN ERROR IS DETECTED IN ONE OF THE DEVICE REGISTER 
ACCESS TESTS, PROVIDED EXTENDED ERROR REPORTING HAS BEEN REQUESTED. 
THIS SUBROUTINE REPORTS THE ACTUAL AND EXPECTED FROM THE OEVICt 
REGISTERCS) WHICH IS(ARE) IN FAULTY. 



INPUTS; 



OUTPUTS: 



Rl - ACTUAL DATA (UNUSED BITS SET TO 0). 

R2 - EXPECTED DATA CUNUSED BITS SET TO 0). 

R3 - OFFSET (IN BYTE3) TO THE REGISTER BEING TESTED. 

R5 - LINE NUMBER OF REGISTER BEING TESTED. 

RMATBB - LABEL AT BASE OF REGISTER MESSAGE ADDRESS TABLE 

MESSAGES ARE PRINTED AT THE OPERATORS CONSOLE, 



CALLING SEQUENCE: 



COMMENTS: 



INCLUDE THE LABLE "ER1601" AS THE MESSAGE POINTER 
PARAMETER IN THE DRS ERROR REPORT MACRO CALL. 



000100 
163576 



SUBORDINATE ROUTINES CALLED: NONE 

+ + + ** + + ♦ + ♦**♦.**♦********** + + + *** + ***** + ***** + ** + **************** + ********* + ** 

BGNMSG ER1601 

ER1601: ; 

j try TO CLEAR THE 

lEXT'D ERROR REPORTING FLAG 

{EXIT IF FLAG NOT SET. 



MOV 


4BIT06.R0 


BTC 


OPT ION, RO 


BNE 


25 



•16430 016304 002262 



MOV RMATBB(R3).R4 
PRINTS 0EF16O4,R4,R5 



004451 
000003 



000010 



004 345 
000002 



000006 



00440/ 
000002 



000006 



PRINTX />EF1602,R2 



S FETCH ADDRESS OF REGISTER NAME MESSAGE. 

5 REPORT BASIC MESSAGE (REG NAME AND LINE 3). 

MOV R5,-(Sf J, » 

MOV R4.-CSP) 

MOV OFF 1604, 

MOV *3. (SP) 

hOV SP.HO 

TRAf C$PNTB 

ADD 010. S 



( SP) 



{PRINT THE EXPECTED DATA. 



PRINTX <>EF1603,R1 



{PRINT THE ACTUAL DATA. 



MOV R2, (SP) 

MOV CF.F1602, -CSP) 

MOV 02, (SP) 

MOV SP.RO 

TRAP C5PNTX 

ADD 06 . SP 

MOV Rl. CSP1 

MOV 0FF16O3, (SP) 

MOV <K'. , <. SP ) 

MOV SP.WO 

TRAP C$PNTX 

ADD 06 , SP 



e*>. 



ENDMSG 



1.10007. 



[f 



1 1 

) 
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^EQ 53 



TRAP 



CJMbG 



PAR 



c 



41 
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2085 
2086 

2C8* 

2oa*> 
ros>o 

20^1 
20^2 
20*5 

20*4 
20*6 

20*8 

2 100 

2101 
2 10.-? 
210 3 
2104 
2105 
2106 
2107 



MACRO 



Ml 200 



15 MAR -64 
ER1603 - 
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SEG 54 



2108 
2109 

?uo 
rui 

2112 
2113 
2114 

2115 



2117 

211a 



21 r-* 
2120 

2121 



016526 
016526 

01fe5?6 
016526 

016532 
016536 
016542 



016544 
016544 
016546 
016552 
016556 
016560 
016562 

016566 
016572 
0165/2 
0165 74 
016600 
016604 
016606 
016610 

016614 
016614 
016616 
016616 
Qlfc616 



01270" 

046Tv»0 
001024 



01014*. 
012746 
012746 
010600 
104414 
062706 

016702 

010246 
012746 
01274b 

010600 
104414 
062 706 



0047^6 



104425 



SBTTL Gl.OBAl ERROR REPORTING ROUTINE • ER1603 

*********** I*************************************************************. 

THIS FUROR REPORTING ROUTINE IS USED TO PRINT OUT A BASIC ERROR 
MESSAGE, ALONG WITH A MESSAGE INTORMING THE OPERATOR WHICH TEST IS 
ABOUT TO BE ABORTED, PROVIDED EXTENDED ERROR INFOMATION HAS BEEN 
REQUESTED. OTHERWISE ONLY A "TEST FAILURE" MESSAGE Will BE PRINTED. 

INPUTS t Rl CONTAINS THE ADDRESS OF THE MESSAGE TO BE PRINTED. 

ERRMSG - CONTAINS THE ADDRESS OF THE MESSAGE THAT INDICATES 
THE TEST THAT IS BEING PERFORMED, EG DMA, BREAK ETC. 

OUTPUTS! MESSAGES APE PRINTED AT THE OPERATORS CONSOLE. 
"TESTNAME TEST ABORTED" 



■ *♦ 



CALLING SEQUENCE} 



COMMENTS} 



INCLUDE THE. LA8LE "ER1603" AS THt MESSAGE POINTER 
PARAMETER IN THE DRS ERROR REPORT MACRO CALL. 



004567 165244 



SUBORDINATE ROUTINES CALLED: NONE. 

*****t***********»***********************************«***********«****A 

BGNMSG ER1603 

ER1603; : 
t >AVE THE CONTENTS Of THt GPRS, 
JSR RS^REGOS i CALL REGISTER SAVE SUBRT 



SAVE 



000100 
163462 



MOV 
BIC 
ONE 



06IT06.R0 
OPT ION, RO 
2$ 



PRINTB 0EF0503.R1 



|TWH TO CLEAR THt 

iF.XT ERROR REPORTING FLAG 

IKXIT IF FL AG NOT SET, 



iPRlNf BASIC MESSAGE ON OPERATORS CONSOLE. 



004074 
000002 



000006 
165200 



004nS 
000002 



0OOQ06 



MOV ERRMSG, R.: 
PRINTB OEF1601 t R2 



iGE T THE 'TEST MESSAGE'", 
{PRINT "TEST ABORTED" MESSAGE. 



Hi 



PASS 
ENQMSG 



jRfc STORE THt CONTENTS OF THE GPRS. 
JSR PCiSCSPK 





MOV 


Rl, (SP) 






MOV 


OEF0503, 


(SP^ 




MOV 


#2. -( SP) 






MOV 


SP.RO 






TRAP 


CtPNTB 






ADD 


06, SP 




SSAGE. 










MOV 


R2 . - 1 SP ) 






t1Q\ 


OEf 1601, 


-(SP^ 




MOV 


02, (SP) 






MOV 


SP.RO 






TRAP 


CIPNTQ 






ADO 


06 , SP 




t'ttt- TURN 


TO PREuO 1 ' S^IRT, 




LlOOlOi 










TRAP 


C*HSo 
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SFG) 55 



212* 








:ii!4 








2125 








2126 








212: 








212s 








212^ 








tH50 








^151 








2132 








2133 








.154 








2135 








2136 








2137 








2138 








213* 








2140 








2141 








2142 








2143 








2144 








2145 


016620 
016620 






2146 








2147 


016620 


012700 


000100 


21*B 


016624 


046700 


163374 


2149 


016630 


001033 




2150 








2151 


016632 








016632 


010146 






016634 


012746 


0040 74 




016640 


012746 


000002 




016644 


010600 






016646 


104414 






016650 


062 706 


000006 


2152 


016654 








016654 


010546 






016656 


012746 


00454b 




0166b2 


012746 


000002 




016666 


0106OO 






016670 


104415 






016672 


062706 


000006 


2153 


016676 








0166 76 


010446 






016700 


012746 


004615 




016704 


012746 


000002 




016710 


010600 






016712 


1044 15 






016714 


062706 


0QQQG6 


2 1 !j4 








aisb 


016 720 
016720 








016720 


104423 





59TTI GLOBAL FRROR REPORTING ROUTINE ER3001 

♦ *♦*♦♦ + ♦♦♦*♦♦♦♦♦♦♦*♦*♦♦*****♦♦♦***♦♦****♦****♦♦♦♦♦*♦♦**♦♦♦♦♦■>♦*♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦ 

♦ THIS IS AN ERROR REPORTING SUBROUTINE WHICH IS INTENOED FOR USE IN THE 

* 
* 

♦ INPUTS: 

4 

♦ OUTPUTS: 
♦ 

♦ CALLING SEQUENCE- INCLUDE THE LABEL "ER3001** AS THE MESSAGE POINTER 

♦ PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 

♦ COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION, 

♦ SUBORDINATE ROUTINES USED: NONE. 



INTERRUPT BR LEVEL TEST, IT REPORTS ADDITIONAL INFORMATION WHEN AN 
INTERRUPT HAS OCCURRED AT THE WRONG BR LEVEL. UNLESS EXTENDED ERROR 
REPORTING HAS BEEN REQUESTED, ONLY THE TEST FAIL MESSAGE 
BE PRINTED. 

rtl - ADDRESS OF MESSAGE TO PRINT FIRST. 

R4 - OR LEVEL AT WHICH THE INT REQUEST OCCURRED. 

R5 - EXPECTED OR CORRECT BR LEVEL FOR THE OUT. 

A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 



BGNMSG ER3001 



MOV 


06IT06.RO 


BIC 


OPTION, RO 


BNE 


?\ 



PRINTB 0EF0503.R1 



ER3001: : 

j TRY TO CLEAR THE 

{EXT D ERROR REPORTING FLAG 

lEXlT IF FLAG NOT SET. 

iPRINT THE FIRST LINE OF THE MESSAGE. 



PRINTX 0EF3001.R5 



iRkPOHT EXPECTED UR LEVEL 



PRINTX 0F.F3002.R4 



l REPORT ACTUAL BR LEVEL, 



eti 



ENDMSG 



MOV 


Rl. -(SP) 




MOV 


Of F 0503, 


ISP) 


MOV 


02, (SP) 




MOV 


SP.RO 




TRAP 


CSPNTB 




A'jD 


06 , SP 




L . 

MOV 


R5, (SP) 




MOV 


OEF3001, 


(SP) 


MOV 


02 . C SP ) 




MOV 


SP.RO 




TfcAP 


CtPNTx 




ADD 


06, SP 




MCV 


R4 , - ( SP ) 




MOV 


Off- 3002, 


■ C SP ) 


MOV 


02, <**P) 




MOV 


SP . RO 




TP'\« 


CJPNTX 




ADD 


ot> , SP 




L100U: 







TRAP 



CJMSG 



E5 
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2157 
2158 

2159 

J? 160 
2161 

2165 
2164 

2165 
2166 

ait. : 

2168 

2169 

21?0 
2171 
21'? 
2173 
2174 
2175 
2176 
2177 
2178 
2179 
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SEQ 56 



2160 
2181 
2182 
2183 



2184 
2185 
2186 
2187 
2168 
2189 
2190 



2191 
2192 
2193 
2194 
2195 



016722 

016722 

016/22 

016726 

016732 

016734 

01673-1 

01674C 

016744 

016750 

016752 

016754 

016760 

016762 

016766 

0167 70 

016772 

016774 

016776 

016776 

017002 

017004 

017010 

017014 

017016 

017020 

017024 

01/026 

017030 

017052 

017054 

017034 

017O34 



012700 
046700 
001040 

012746 
012746 
012746 
010600 
104414 
062706 
005002 
016703 
005004 
00024 1 
006003 
103013 

016446 
010246 
012746 
012746 
010600 
104415 
062706 
012405 
005202 
005 70 5 
001356 



SRTTL GLOBAL ERROR REPORTING ROUTINE - ER9004 - 

♦ THIS IS AN ERROR REPORTING SUBROUTINE WHICH REPORTS ERROR SUMMARIES 

♦ FOR LINES WHICH HAVE EXCEEDED THE SPECIFIED MAXIMUM NUMBER OF 

> INDIVIDUAL RECEPTION ERRORS, PROVIDED EXTENDED EKROR REPORTING HAS 

♦ BEEN REQUESTED BY THE OPERATOR. 
* 

Rl • ADDRESS OF MESSAGE TO PRINT FIRST, 

ERCNTB LABEL AT BASE OF LINE ERROR COUNTERS TABLE. 

ERSMRF - "REPORT ERROR SUMMARY FOR LINE" FLAGS. 



* INPUTS? 

* 
* 

* OUTPUTS; 

* 

♦ CALLING SEQUENCE: 

♦ COMMENTS: 
<• SUBORDINATE ROUTINES USED: NONE. 



A MESSAGE IS PRINTED AT THE OPERATOR CONSOLE. 

INCLUOE THE LABEL "ER9004" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL 



THE MESSAGE IS PRINTED AS 
THE CONTENTS OF GPR'S R2, 



BASIC AND EXTENDED 
R3, R4, AND R5 ARE 



ERROR INFORMATION. 
DESTROYED. 



BGNMSG ER9004 



000 100 
1632 72 



014722 
0040 74 
000002 



000006 
1634 74 



MOV 


*eiT06,R0 


BIC 


OPT ION, RO 


BNE 


61 


PRINTB 


OEFO5O3.0EM9O14 



2$ 



CLR 


R2 


MOV 


ERSMRF ,R3 


CLR 


R4 


CLC 




ROR 


R5 


BCC 


41 


PRINTX 


0EF9O1O.R 



ER9004: : 

I TRT TO CLEAR THE 

jEXT'D ERROR REPORTING FLAG 

{EXIT IF FLAG NOT SET. 

jREPORT THE SECONDARY ERROR MESSAGE. 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 

I CLEAR THE LINE COUNTER. 

j GET THE ERROR SUMMARi FLAGS. 

iCLEAR "LINE COUNTER TIMES 2" OFFSET. 

jCLEAR THE CARRY FOR THE FOLLOWING ROTATE. 

{SHIFT ANOTHER ERROR SUMMARt FLAG INTO CARRi . 

j SKIP PRINTING MESSAGE IF FLAG FOR LINE CI EAR, 



0EM9014, (SP) 
0EFO5O3, -CSP) 
*2. -(SP) 
SP.RO 
CiPNTB 
06, SP 



002464 

004 710 
000003 



000010 



MOV 


ERCNTB(fl4^ 


MOV 


R2, -(SP) 


MOV 


OFF 90 10, -I 


MOV 


«3 . ■• C SP ) 


MOV 


SP.RO 


TRAP 


CiPN^X 


ADD 


010, SP 



I 'IP ) 



4$ 



6* 



MOV 


( R4 ) • 


»R5 


INC 


R2 




TST 


R3 




BNE 


2$ 




t NDMSG 







l INCREMENT THE LINE Of F SET B> 2. 

llNCRFMT THE LINE COUNTER. 

; CHECK THE ERROR SUMMARi FLAGS, 

j IF MORE FLAGS SET, LOOP TO DO OTHER LINE 



L 10012: 



10442 



v 



TRAP 



CSMSG 



r: 



gtm^^^RMtWBfiAS^GO?^ 
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^EQ 57 



2197 
21^6 
2199 
2200 
2201 

2203 

2204 
2205 
2206 
220 7 
2208 
2209 
2210 
2211 
2212 
221? 
2214 
2215 
2216 
2217 
2218 
2219 

2220 
2221 
2222 
2223 
2224 
2225 
2226 
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ro; 



27 



2228 
2229 



017036 
017036 

017036 
017042 
017046 

017050 
017054 
017054 
017056 
017060 
017064 
017070 
017072 
017074 
017100 
017100 
017102 
017104 
017110 
017U4 
017116 
017120 

017124 

01 7124 
017X24 



012700 
046700 
001026 



010346 
010146 
012746 
012746 
010600 
104414 
062706 

010246 
010146 
012746 
012746 
010600 
104415 
062706 



104423 



000100 
163156 



042703 177760 



005150 
000003 



000010 



005074 
000003 



00001Q 



* 
* 

* 
+ 
* 
+ 
* 
* 

l <- 

;♦ 
i* 
t* 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH IS USED TO REPORT THAT 
SOMETHING OTHER THAN A SELFTEST CODE WAS FOUND IN A SELFTEST CODE 
FIFO SLOT DURING THE REMOVAL OF THE SELFTEST CODES FROM THE FIFO. 
THIS ROUTINE IS USED BY THE RSTRPT ROUTINE. EXTENDED ERROR INFOMATION 
IS GIVEN ONLY WHEN REQUESTED IN THE SOFTWARE QUESTIONS. 



INPUTS! 



OUTPUTS: 



Rl - ADDRESS OF ERROR MESSAGE QUALIFIER STRTNG. 
R2 - INCORRECT CODE AS READ FROM THE SELFTEST CODE 
R3 - LINE NUMBER ASSOCIATED WITH THL SELFTEST FIFO 

A MESSAGE IS PRINTED AT THE OPERATOR CONSOLE. 



FIFO 
SLOT 



SLOT 



CALLING SEQUENCE: 



INCLUOE THE LABEL "ER9007" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL 



COMMENTS: 



THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 



SUBORDINATE ROUTINES USED; NONE 



t+it*********************^***********^****************************^ *****+**+** 



BGNMSG ER9007 



ER9007: : 



2*t 



MOV 


0BIT06.R0 


iTRr TO CLEAR THE 






BIC 


OPTION, RO 


iEXT'D ERROR REPORTING FLAG 






BNE 


2$ 


jEXIT IF FLAG NOT SET, 






BIC 


0177760, R3 


{REMOVE ALL BUT LINE BITS FROM LINE 


WORD. 




PRINTB 


OEF9018,R1,R3 


j REPORT SECONDARY ERROR MESSAGE. 

MOV 
MOV 


R3,-(SP) 
Rl.-(SP) 








MOV 


OEF9018. • 


CSP) 






MOV 


03, CSP) 








MOV 


SP.RO 








TRAP 


CSPNTB 








ADD 


010, SP 




PRINTX 


0EF90W.Rl.R2 


iREPORI THE ACTUAL INCORRECT CODE. 

MOV 
MOV 


R2.-CSP) 
Rl, CSP) 








MOV 


♦6F9017, 


CSP) 






MOV 


03. -(SP) 








MOV 


SP.RO 








TRup 


CSPNTX 








ADD 


010, SP 




ENDMSG 




L10013; 







TRAP 



C*MSG 
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SEQ 58 



2232 
2233 
2234 
2235 
2236 
2237 

2238 

223^ 
2240 
2241 
2242 

224 3 
2244 
224 5 
2246 
224 7 
2245 
2249 
2250 
2251 

2252 

225? 
2254 

2255 
2256 

2257 
2258 
2259 
2260 
2261 
2262 
226 5 
2264 



2265 



01/126 
017126 

017126 
017132 
017136 



2266 
2267 



017140 
017142 
017144 
01715O 
017150 
017152 
01/154 
017160 
017164 
017166 
0171/0 
017174 
017174 
017176 
017200 
01/204 
017210 
01 /iU2 
017214 

017220 
0i7220 

017320 



012700 
046700 
001030 



010203 
000303 
042703 

010346 
010146 
012746 
012/46 
010600 
104414 
062706 

010246 
010146 
012746 
012746 
010600 
104415 
062706 



104423 



. SBTTL GLOBAL ERROR REPORTING ROUTINE! - ER9008 •• 



* 
* 

,* 

J * 

; * 
j * 
j ♦ 

! * 
J* 
} + 
J* 
1* 

; * 

? ♦ 

* 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH IS USED TO REPORT THAT 
AN UNEXPECTED CODE OR CHARACTER HAS BEEN FOUND IN THE DUT RECEIVE 
CHARACTER FIFO, THE ADDITIONAL ERROR IS REPORTED ONLY IF REQUESTED 
DURING THE SOFTWARE QUESTIONS. 



INPUTS? 



OUTPUTS 



Rl - ADDRESS OF PARTIAL ERROR MESSAGE STRING. 

R2 - INCORRECT CODE AS READ FROM THE SELFTEST CODE FIFO SLOT. 

A MESSAGE IS PRINTED AT THE OPERATOR CONSOLE. 



CALLING SEQUENCE: 



INCLUDE THE LABEL "ER9008" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALl 



COMMENTS j 



THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 



* SUBORDINATE ROUTINES USED: NONE. 



BGNMSG ER9Q08 



ER9008 



000100 
163066 



hOV 
B1C 
BNE 



0BIT06.RO 
OPTION, RO 
2* 



{TRY TO CLEAR THE 

{F.XT'D ERROR REPORTING FLAG 

lEXIT IF FLAG NOT SET. 



EXTRACT 

FROM 



THE 
THE 



LINE NIK1BER FROM THE INCORRECT CODE OR CHARACTER WHICH WAS READ 
SELFTEST CODE FIFO SLOT. 



177760 



004 /7 7 
000003 



000010 



005074 
000003 



OOOOiO 



MOV R2.R3 

SWAB R3 

BIC 01 77760, R3 

PRINTB 0EF9016.R1.R5 



jCAL.CUl ATE l.INt 
j REPORT TYPE OF 



NUMBER Of" 
INCORRECT 



CODt 
CODE 



PRINTX OfcF901V.Rl.R2 jRLP(\*T THE ACTUAL INCORRECT 



FOUND 

MOV 
MOV 
MOV 
MOV 
MOV 
TRAP 
ADO 
CODE. 
MOV 
MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 



R3, -(SP) 
Rl.-CSP) 

0f.F901<->, -CSP) 
03, fSP) 

SP.RO 
CSPNTB 
010. SP 



2»s 



ENDMSG 



L 100 14: 



TRAP 



R2 , - ( SP ^ 
R 1 . ( SP ) 
0EF901 \ 
05, (SP) 
SP.RO 
C$PNIX 
010, SP 



CSMSG 



-(SP) 



C/DHUrtO DHU 11 K1MC TST 
GLOBAL. ERROR REPORTING 

2269 
2^ /O 



22 73 
2274 
22 '5 

i . «. * r» 

■-»■■> ■ » ■- 

Ci. 

-\ ~, -t Q 
22 " ? 9 

2280 
2281 
2282 
2283 
2284 

2286 
228/ 
2288 

2289 

2290 

2291 

2243 

2294 
2295 



F»rtH I 1 

ROUTlNh 



MACRO M1200 15 MAR 

• F.R9101 - 



H r ) 

84 09; 15 PAGE 50 



SEQ 59 



2297 



017222 
017222 

01/222 
017226 
017232 



017234 
017254 
01 V36 
017240 
01/244 
01/2S0 
01 ??.$? 
017254 

01 /260 
01 /260 
01/260 



012/00 
046 700 
001012 



010146 
010246 
012 746 
012 746 
010600 
104414 
062/06 



104423 



000100 
162772 



004664 

000003 



000010 



.SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9101 

; ****************************************** ****** ****************************** 

j* THIS IS A GENERAL ERROR REPORTING SUBROUTINE WHICH REPORTS A MESSAGE 
i* WHICH TAKES A SINGLE, 2 DIGIT DECIMAL ARGUMENT AFTER THE END OF AN 
{♦ ASCII MESSAGE. 

♦ INPUT5: Rl - VALUE 10 BE PRINTED AFTER HSG AS 2 DECIMAL DIGITS. 

♦ R2 - ADDRESS OF MESSAGE TO PRINT FIRST, 
i* 

;♦ OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 

J* 

j* CALLING SEQUENCE: INCLUDE THE LABEL. "ER9101" AS THE MESSAGE POINTER 

♦ PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
* 

♦ COMMENTS: THE MESSAGE IS PRINTED AS BASIC ERROR INFORMPTION. 
* 

♦ SUBORDINATE ROUTINES USED: NONE. 
****************************************************************************** 



BGNMSG ER9101 



ER9101: * 



MOV 


OB1T06,RO 


BIC 


OPTION.RO 


BNE 


2$ 



i TRY TO CLEAR THE 

iF.XT'D ERROR RF PORT TNG FLAG 

jEXIT IF FLAG NOT SET. 



PRINTS 0EF9006,R2,R1 *REPORT THE STRING FOLLOWED BY THE NUMBER, 



2$: 



ENDMSG 



L10015: 



MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 



TRAP 



Rl, -CSP3 
R2, -C5P) 
$t:F9006,-(5P) 
*5, (SP) 

C*PNT» 

010, SP 



C5MSG 
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SEQ 60 



l\? l w 








2300 








2301 








2302 








250 5 








2304 








2305 








230* 








23o* 








230S 








2304 








25io 








^511 








2312 








2 5 1 5 








2?u 








2315 








2316 








2317 








2516 








;!519 








2320 


01/262 
01/262 






2321 


01 /262 








017262 


00456/ 


164510 


.'.Vi 1 








2523 


017266 


012/00 


OOOIOO 


2324 


0172/2 


046 700 


162726 


2;>25 


01 7276 


001064 




2326 








2327 


017300 








01 /300 


010146 






01/302 


012746 


004074 




01 /306 


012/46 


000002 




01/312 


010600 






017314 


104414 






017316 


062/06 


000006 


2.VH 


017 322 


012703 


00252'.- 


2324 


01/326 


012/05 


015336 


2330 


017332 


012301 




23 31 


01 /354 


012304 




23 32 


017336 


004 76 / 


000056 


23 33 


01 /342 


020 302 




23 34 


01/344 


103772 




2335 








23 3»> 








23 3/ 








2 3 3H 








23 34 








2 340 








2 54 1 


01 M46 


02022 / 


002/22 


234 2 


01 M52 


001036 




2 34 3 


1 / 3 r >4 


005 /62 


000002 


2 344 


1 / 360 


0014 33 




2 345 


01 /362 


012301 




2.34», 


01 /364 


011304 




2 '34/ 


017 366 


012705 


015366 



SBTH GLOBAL ERROR REPORTING ROUTINE - ER4301 - 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ANY BMP CODES 
THAT ARE FOUND IN THE BMP CODE QUEUE, TOGETHER WITH THE THE NUMBER OF 
THE TEST THAT WAS EXECUTING AT THE TIME THE BMP CODE WAS LOGGED, 
PROVIDED EXTENDED ERROR REPORTING HAS BEEN ENABLED. 



INPUTS: 



OUTPUTS 



Rl 
R2 



THE 
THE 



ADDRESS 
ADDRESS 



OF 
OF 



THE 

THE 



THE TEST 
OPERATOR 



NUMBER FOLLOWED 
CONSOLE . 



FIRST MESSAGE TO BE REPORTED. 
NEXT EMPTY CELl IN THF QUEUE. 

BY THE BMP CODE ARE PRINTED AT THE 



* 

* 
+ 

* 

* 
* 

* 
♦ 

*******************A** + ** + 4.* + ^** + * + ****** + * + * + * + * + ** + ** + + *+**+v- * + + + ** + *♦ + * + *+* 



CALLING SEQUENCE 



INCLUDE THE LABEL 
PARAMETER IN THE 



"ER9301" i 
DIAG SUPER 



IS THF 

ERRO*\ 



MESSAGE POINTER 
REPORT MACRO CALL 



COMMENTS: 



THE 



IS PRINTED AS BASIC ERROR INFORMATION, 



SUBORDINATE ROUTINES USED: NONF 



BGNMSG ER9301 
SAVE 



JSR 



MOV 
BIC 
BNE 



06IT06.RO 

option.ro 

60 f 



ER9 301: : 
;SAVE THE GPRS ON THE STACK. 
R5,PREG05 ;CAU. REGISTER SAVE SUBRT 

j IRf TO CLEAR l^t 

iEXT'0 ERROR REPORTING FLAG 



jEXIT IF Fl.AG NOT 



T 



PRINTB 0EF0503.R1 



2$: 



MOV 06HPCGB.R3 

MOV 0fM9302.R5 

MOV (R3)»,R1 

MOV tR3)»,R4 

JSH PC, 50$ 

CMP R3.R2 

BLO 2$ 



{REPORT UNEXPECTED BMP CODES FOUND. 

nov 

MOV 

MOV 

MOV 

TRAP 

ADD 

OF THE BMP CODF 

REPORTED. 

TEST THAT WAS EXECUTING 

REPORTED OFF THE QUEUE. 



I GET 
5 GE T 
i GE T 

I GE T 



the 
THE 
THE 
BMP 



START ADDRESS 

MESSAGE TO BE 

NUMBER OF TH€ 

CODE THAT WAS 
i GO REPORT THE BMP CODE. 

{CHECK V ALL COOES HAVE BEEN REPORTED. 
{IF IT IS NOT THE LAST BMP CODE THEN LOOP 



Rl, CSP) 
0EF05O3, 
02, CSP) 
SP.RO 
CJPNTB 
06 . SP 
QUEUE. 



CSP> 



CHECK U 
THE CONDI 
I AST CELL 
CELL, 



VtRFlOW HAS OCCURRED. 
TI0N5 ► OR OVEPM.OW ARE 
IN THE QUEUE, AND A BMP CODE HAS ALREADY BEEN WRITTEN INTO 



THE POINTER CONTAINS T-JE ADDRESS Of 



TH{ 

thp r 



CMP R2.0HMPCQE 

BNf 601 

I 5 1 2CR.M 

W U *»0$ 

MOV (R3K ( Rl 

MOV (R3),R4 

MOV 0EM93O3.R5 



I CHECK IF THE POINTER IS 
jtXlT IP NOT AT THE LAST 
{CHECK EOR A BMP CODE IN 
{MIT IF NO OVERR OW HAS 
{GET THE TEST Nl«MBER OM 



AT THt LAST LOCAT ION 
LOCATION, 
THE LAST CELl 
OCCURED, CELL EMPTt . 
THE QUEUE . 



{GIT THE BMP COOF OFF THt QUI Ok . 
{SELECT THE MESSAGE TO BE REPORTED, 



CZDHUHO DHU-11 FUNC 1ST PARTI 
GLOBAL. ERROR REPORTING ROUTINE 



2346 



234^ 

2350 
2351 
2552 



2353 

2354 

2355 
2356 



01737a 

01 ^372 
017376 
01740? 
017404 
017406 
0W412 
017416 

017420 
017420 
017422 
017424 
017426 
017432 
017436 
017440 
017442 
017446 
017450 
017450 

017452 
0174V 
017452 104423 



012746 
012746 
010600 
104415 
062 706 
004 76 7 
000414 



C10446 
010146 
010546 
012746 
0127**' 
010600 
104415 
062 706 
000207 

004 736 



005333 
000001 



000004 
000002 



005255 
000004 



ooooia 



t. 



5 



MACRO M1200 15 -MAR -84 
ER9301 - 
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SEQ 61 



PRINTX 0EF9302 



J5R 
BR 



PC, 50$ 
6C$ 



jREPORT OVERFLOW CONDITION. 

MOV 

MOV 

MOV 

TRAP 

ADD 

[REPORT THE LAST BMP CODE PLACED ON 

{EXIT. 



0F.F9302.-CSP) 
*1, -(SP> 

SP.PO 
C*PNTX 

04, SP 
THE QUEUE. 



505; 



PRINTX 0£F93O1.R5,RL,R4 jPRINT THE MESSAGE. 



60$; 



PA5S 



fcNDMSG 



PC 



JSR 



i RE TURN. 

jReSTORt ME GPR CONTENTS. 

PC,6)(SP)+ {RETURN 



L10016: 



MOV R4.-CSP) 

MOV R1.-C5P) 

MOV R5.-CSP) 

MOV 0FF9301, CSP) 

MOV *>4,-( r iP) 

MOV SP.HO 

TRAP CSPNTX 

ADD 012. SP 



TO PREG05 SUHRT. 



TRAP 



CJMSG 



I<!> 



r ) 



C/DHLHiO DHUll f UNC T bT PA<U 1 
GLOaAl. SUBROUTINES SECTION 



i?3MS 
^3t>8 

.wo 
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.SBTTL GLODAL SUBROUTINES SECTION 



r *EQ 62 



THE GLOBAL. SUBROUTINES ScCTION CONTAINS THfc SUBROUTINES 
THAT ARE. USEO IN MORE THAN ONE TEST. 



L r: 



.) 







SM ,i m6h^ 



NC TST PARTI 



m m¥ c - 
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SEQ 63 



23/4 
2 5. '5 
23 76 

2V-' 
23 .'8 

23"'0 

23ao 

2381 
2385 

2384 

2395 
2386 

238/ 

2388 
238*' 

2391 
2392 
2395 
2394 
2395 
2 396 
2397 
2398 
2399 
2400 
2401 

2402 
2405 
2404 
2405 
2406 
240/ 
2408 
24 09 
2410 
24 11 
2412 
2415 
2414 
2415 
24 16 
241/ 
2418 
24 19 
2420 
2421 
2422 
2425 
2424 
2425 
2426 
242/ 
2428 



SBTTL. GLOBAL SUBROUTINE 



ALTFLD 



01/454 
017454 



017460 
01/462 
01/464 
017466 



01/4 72 
01/4/4 
01 74/6 
01 /500 
01/504 
01/506 
017510 
017512 
01 /514 
017516 
017520 



- ALTER DEVICE REGISTER FIELDS ROUTINE - 
THIS SUBROUTINE ALTERS THE SPECIFIED FIELD OF THE SPECIFIED DEVICE 
REGISTER FOR THE SPECIFIED LINES. THIS ROUTINE CAN BE USED TO SET 
OR CLEAR BITS WITHIN SELECTED FIELDS OF SELECTED REGISTERS, 
USE EXAMPLES: SET RX.BAUO.RATE FIELDS ON LINES 3 AND 6. 

CLEAR TX.DMA BITS ON ALL LINES. 



INPUTS 



m - 

R2 - 
P3 - 

R4 - 
CSRA 



ADDRESS Of THE REGISTERS TO ALTER. 
BIT FIELDS SET TO DESIRED STATES. 

GIT MAP OF LINES FOR WHICH TO ALTER 



REGISTER 



MASK OF BITS TO ALTER (1 INDICATES CHANGE BIT) 
• CONTAINS THE ADDRESS OF THE DEVlCc CSR. 



OUTPUTS; 



IESTAT - SAVED STATES OF THE INTERRUPT ENABLE BITS. 

DEVICE REGISTERS - SPECIFIED REGISTER FIELDS ALTERED 
CSR IN(\ADR.REG FIELD - DESTROYED. 



CALLING SEQUENCE 



COMMENTS: 



THIS 
WITH 
THIS 



JSR 

ROUTINE 
NUMBERS 
ROUTINE 



PC, ALTFLD 

READS THE SPECIFIED REGISTERS FOR ALL LINES 
LOWER THAN THE HIGHES SPECIFIED LINE. 
DOES NOT READ THE CSR. 



SUBROUTINES CALLED: NONE. 



+ * + ****#*** + + ********* + ***** + ++**+ + **#* + + *4.* + *+*** + 4** + *** + ***** + *+*.*** + ** + 



004567 164316 



ALTFLD:: SAVE 



JSR 



{SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 jCALL REGISTER SAVE SUBRT 



SET UP TO LOOP FOR EACH LINE: 

PREPARE THE WORD TO BE OREO INTO THE REGISTER CONTENTS, 

SET \JP THE WORD TO WRITE INTO THE IND.ADR.REG FIELD OF THE CSR. 



010400 
005100 
040002 
016705 



162616 



MOV 
COM 
DIC 
MOV 



R4.R0 
RO 

R0,R2 
IESTAT, R5 



j CALCULATE THE NEW CONTENTS OF THE 
j REGISTER FIELDS WHICH ARE TO BE 
j ALTERRED BY THIS ROUTINE. 
;SET UP TO WRITE IND.ADR.REG FIELD TQ 







000241 
006005 
105006 
01057/ 
011100 
040400 
050200 
010011 
005205 

oor /0 5 

001365 



LOOP ONCE FOR EACH LINE, ALTERING THE SPECIFIED FIELD IN THE SPECIFIED 
REGISTER IF THE l.INfc HAS BEEN SELECTED FOR ALTERING. 

EXIT THE LOOP IF NO MORE LINES TO ALTER, OR IF WE HAVE ALTERED THE MAX 
ALLOWABLE NUMBER OF LINES CAS SPECIFIED BY NUMLNS). 



2$: 



162536 



4*1 



CLC 




ROR 


H*> 


BCC 


4* 


MOV 


R5,cJCSRA 


MOV 


(Rl).RO 


BIC 


R4.R0 


BIS 


R2.R0 


MOV 


HO, CRD 


INC 


R5 


TST 


R5 


BNE 


2* 



{PREPARE 
j GET THE 



FOR ROTATE, 
LINE SELECT 



BELOW 



{SKIP SETUP V LINE 



I 5 



"TST R5" DOES THIS 
BIT FOR THIS LINE. 
IS NOT SELECTED. 
ET OUT CSR IND.ADR.REG FIELD TO THIS LINK 
{GET THE PRESENT CONTENTS OF THE REG TO ALTER 
{CI EAR TKV BIT FIELDS WE ARE TO ALTER. 
{OR IN THE NEW STATES OF THE FIELDS. 
i WRITE THE NEW REGISTER CONTENTS TO THE REG. 
j SET I TNE NUMBER TO THE NEXT LINE, 
j CHECK FOR UNHANDLED LINES. CLEAR CARRi K.AG. 
{LOOP IF SELECTED LINECS) IS NOT HANDLED. 



C/DHUBO DHU 11 fUNC TST PARTI 
GLOBAl SUBROUtlNE 



•IACRO Ml 200 
• ALTFLD • 



M5 
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SEU 64 



24 30 01 /52c? 

017132? 

2431 017524 



60$ i 



004 7 56 
000207 



PAS' 



RTS 



jRESTCM GP'1 
JSR PC.S(SP)- 



{RETURN TO PREG05 SU8RT 



PC 



, RETURN it? CALLING RUUTNE. 



CZDHOOO DHU 11 fUNC 
GLOBAL SUBROUTINE 

2433 
2454 
2435 

24 36 
2437 

24 38 
24 39 
2440 
2441 
2442 
244 3 
2444 
2445 
2446 
244 7 
2448 
2449 
2450 
2451 
2452 
2453 
21 5 A 
2455 
2456 
245,' 
2458 
2459 
2460 
2461 



TST PARTI 



MACRO M1200 
♦ CALMSL - 



15-MAR-84 09:15 



N5 

PAGE 54 



SEQ 65 



2462 
2463 
2464 
2465 
2466 
246 7 
2468 
2469 

24/1 

24/2 
24 73 
24 74 
24 75 
24 76 
24// 
24/8 
24 79 
2480 
2481 
2482 
248 3 
2484 
24 85 
2486 
248 7 
2488 



01752b 
017526 
017532 



01/542 
017544 
017552 
01 /556 
017560 
017562 
017564 
017566 



0175/0 
ul/5/4 
0175/6 



SBTTL GLOBAL SUBROUTINE - CALMSL - 

- CALIBRATE MILLI SECOND LOOP COUNT SUBROUTINE ■ 
THIS SUBROUTINE CALIBRATES THE TIMING LOOP UHICH IS USED IN THE MSLOOP 
ROUTINE. THIS SUBROUTINE CALCULATES A VALUE FOR THE MSL.CNT VARIABLE 
WHICH IS THE NUMBER OF SCFTWARE LOOPS WHICH TAKES 1 MS TO EXECUTE TN 
THE MSLGOP ROUTINE. THIS ROUTINE CALIBRATES THE COUNT By USING THE 
LINE TIME CLOCK (ETC), SO IF NO LTC IS AVAILABLE THE DEFAULT VALUE FOR 
THE DELAY COUNT MUST BE USED. 



INPUTS: 



OUTPUTS 



MSLCNT 

MSTICK 

TIMER1 
CLKHRZ 

CARRY 

MSLCNT 



DEFAULT 1 MS DEI AY LOOP COUNT VALUE. OR 

VALUE FROM PREVIOUS CALIBRATION. 

NUMBER OF MS PER ETC CLOCK TICK. 

TIMER COUNTER CHANGED BY LTC INTERRUPT SERVICE 

NUMBER OF LTC CLICKS PER SECOND (50 OR 60). 



RTN. 



SET IF LTC IS AVAILABLE, AND NEW CALIBRATION PERFORMED 
NEW 1 MS DELAY LOOP COUNT VALUE IF LTC AVAILABLE, OR 
UNCHANGED IF NO LTC IS AVAILABLE. 



CALLING SEUUENCE: 

COMMENTS: 



JSR 



PC .CALMSL 



SUBORDINATE ROUTINES CAl.l ED: L'NSDIV, OOPS . 

**********+**+**++*****+***+*********♦************************+****** 



****** 



004567 
005067 



164244 
000210 



JSR 



CALMSL : i SAVE 

CLR 62$ 
SYNCHRONIZE WITH THE LTC. 



jSAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 {CALL REGISTER SAVE SUBRT. 
j CLEAR THE 2ND TIME FLAG. 



017536 012705 000001 



005000 
012767 
005 76 7 
001410 
005200 
0013/3 
005305 
003371 



00506? 
00024 1 
000461 



000001 
162566 



2$ 



4$ 



MOV #1,R5 ;SET OUTER LOOP COUNTER 

{INCREASE THE VALUE LOADED INTO 
{FOLLOWING LOOP FAILS ON FUTURE 



TO 1 

THIS 



LOOP 
COUNTER 



IF THE <*+ 



FASTER PROCESSORS. <** 



162546 



CLR 




RO 


MOV 




#1. TIMER1 


TST 




TIMER1 


BEQ 




6 J 


INC 




RO 


BNE 




4$ 


DEC 




R5 


BGT 




4$ 


5 ♦ 

; If WE 


GOT 


NO LTC IN 


; LTC MUST 


BE FLAKE.Y. 


CLR 




CLKHRZ 


etc 






BR 




60$ 



CLEAR THE WAIT FOP CLOCK INT COUNTER. 
;SET UP COUNT Of 1 TO SYNCH WITH LTC. 
jCHECK FOR COUNTER HAVING GONE TO ZERO. 
{JUMP OUT OF LOOP IF LTC HAS INTERRUPTED. 
{COUNT THI^r ITERATION OF THE INNER I OOP. 
;LOOP IF COUNTER HAS NOT TURNED OVER. 
{DECREMENT THE INNER LOOP COUNTER. 
{LOOP IF OUTER LOOP COUNT NOT UP. 



INTERRUPT 
OR NOT 



INDIChIE 

REALLY AN 



THAT THERE 
LTC AT ALL 



IS NO LTC AVAILABLE 



INDICATE NO l.TC 



{clear ltc frequency word to 

{indicate failu2e for return. 

{Bypass the following calibration procedures 



017600 012704 002344 



WE AR<- NOW SYNCHRONIZED WITH THE LTC. 
SET UP -"OR THE CALIBRATION LOOP. 



6$ 



ITUV 



/M1MER1.R4 



{WILL TEST TIMER1 IN THE LOOP BELOW. 



Bh 



C/DHURO DHU U FUNC TsT PARTI 
GLOBAL SUBROUTINE 



2489 017*04 


005001 




2490 017606 


005002 




2491 017610 


005003 




2492 017612 


012714 


00000 I 


2493 






c ^494 017616 


016705 


162534 


24^5 017622 


011400 




2496 017624 


010067 


000120 


2497 017630 


040200 




2498 017632 


020003 




2499 017634 


000261 




2500 017656 


001406 




2501 017640 


005305 




2502 017642 


00 J. 36 7 




2503 017644 


005 501 




2504 017646 


001:'1>5 




2505 017650 


004 767 


000440 


2506 






250 7 






2508 






2509 






2510 






2511 






2512 01/654 


005401 




2513 017656 


016 702 


162474 


2514 017662 


010205 




2515 017664 


160502 




2516 017666 


010204 




2517 017670 


005005 




251ft 0176 72 


005301 




2519 01 76/4 


100405 




2520 01 76 76 


060304 




2521 017 700 


005505 




2W 017 702 
252 5 


000773 




2524 

2525 






2526 017 704 


016701 


162444 


2527 017 710 


010405 




2528 01 7 712 


010502 




2529 017714 


004 76 7 


003140 


2530 017720 


103402 




2531 017722 


004 76 7 


0O0 56b 


2532 01 7 726 


010167 


162424 


2535 017752 


005167 


000010 


25 54 01 7756 


001277 




25 35 017 740 


000261 




2536 






25 3 <* 01 7 742 






01 7 742 


004 7 36 




? r »58 01 '744 


00020 7 




25 39 






,' c .40 (;l 7 746 


000000 




2UA1 0177^0 


000000 





MACRO M1200 


15 -MAR «« 


09:15 PAG 


• CAl.MSl 








Cl.R 


Rl 




a.R 


R2 




clr 


R3 




MOV 


*1.(R4) 


M: 


MOV 


MSLCNT.R5 


10t! 


MOV 


(R4),R0 




MOV 


R0,64t 




BIC 


R2.R0 




CMP 


R0.R3 




SEC 






BEQ 


12$ 




DEC 


R5 




BNE 


10t 




DEC 


Rl 




BNt 


fit 




JSR 


PC .OOPS 



54 -1 



SfcQ 66 



iCLEAR THE OUTER LOOP COUNTER. 
I INDICATE TO CHECK ALL BUS OF T iMfc Ml . 
i INDICATE TO CHECK FOR TIMERl CLEAR. 
jLOAD TIMERl UITH COUNT OF 1, 

jLOAD MS LOOP C0^4T. 

jGET TIC TIMERl VALUE. 

»SAVE WORD (LIKE IN THE REAL LOOP). 

iLEAVE ALL THE BITS. 

, COMPARE AGAINST ZERO. 

j SET CARRY IN CASE Of SUCCESS. 

lEXlT LOOP IF TIMERl HAS CLEARED. 

I COUNT DOWN THE INSIDE MS LOOP COUNT. 

llGOP IF MS NOT UP. 

iDECREMENT THE MS TIME COUNT. 

iKEEP LOOPING. 

jWE OVERFLOWED, SOMETHING IS WRONG ABORT 



WE HAVE NOW HAVE LOOP COLNT INFORMATION FOR ONE CLOCK TICK. 
WE HAVE NEGATIVE OF NUMBER OF OUTER LOOPS IN Rl. EACH IS MSLCNT 
WE HAVE THE PORTION Of THE LAST OUTER LOOP NOT EXECUTED, IN R5 . 
NOW WE CALCULATE THE TOTAL NUMBER OF INNER LOOPS EXECUTED. 



INNtR LUOPS 



12*! 


NEG 


Rl 




MOV 


MSLCNr.Ri? 




MOV 


R2.R5 




sue 


R5.R2 




MOV 


R2.R4 




CLR 


R5 


14$: 


DEC 


Rl 




RMl 


161 




ADD 


R5.R4 




ADC 


R5 




BR 


14 t 


} DIVIDE THE TOTAi NUMBER 




MOV 


MSTICK.R1 




MOV 


R4,R») 




MOV 


R5,R.. J 




JSP 


PC.UNSDIV 




BCS 


181 




JSH 


PC.UOPS 


lflt! 


MOV 


R1.MSICNT 




COM 


62$ 




BNf 


2$ 




SEC 




60t ! 


PASS 


1 




PIS 


PC 


♦Vt : 


.WOMD 





64tj 


.WORD 






iGET NUMBER OF OUTER LOOPS. 

j GET THE NUMBER OF INNER LOOPS PER OUTER LOOP. 

iCOP> NUMBER OF LOOPS FOR MULTIPLY, 

iCALC ♦ OF INNER LOOPS DONE IN LAST OUTER LOOP 

i AND ADO TO ACCUT*AATOR L SWORD. 

jCLEAR ACCUMULATOR MSWORD . 

, CHECK Rl FOR CONDITION 

i SKIP MULTIPLICATION IF /ERG 

iMO.TIPLl NUMBER OF INNER 

l '.OOPS PEP OUTER LOOP Bi 

iNLtBER OF OUTER LOOPS PERFORMED. 

Of INNER I OOPS Py THE. NUMBER 0^ MS PER I TC TICK, 



DIVIDE NO. 
DIVIDE NO. 
TC TICK 



0^ BUG 



J&R 



jO Of MS PER l TC TICK IS DIVISOR. 

j L SWORD OF LOOP COUNT IS LSWO«D 0* 

iMSWORD Of LOOP COUNT IS MSWORD OF 

lOlVIDF NL^BER OF LOOPS BY MS PER I 

, BYPASS OOPS IF WE' RE OK. 

{CLOCK ROUTINES ARE NOT LONG ENOUGH, 

,SET NfU VALUE ►* OR MS I OOP CO\*T . 

jSET THE 2N0 ITERATION Fl AGS It 1st ITERATION. 

j BRANCH If ONLY ONE ITER A HON DONE. 

i SET THE SUCCESS FLAG FOR EXIT. 

j RE STORE GPRS, 

PC.aKSP). j RE TURN TO PRl G05 st-tlRT % 

I CARRY SUCCESS FLAG. SET It SUCCEV'. 

1 2ND CAl IRRAUON ITERATION MAG*.. 

lOUMMi WORD FOR STORAGE UK THE READ WORD. 



o 



S4 



C/OH^IO OMU U U'NC TST P*\RTl 
GLOHAi SUBROUTINE 



;M5 

2544 
2545 
254h 

254 * 

:M8 

254^ 

2551 
2552 
255* 

2554 
2555 

255t, 

2557 
255s 

255^ 

2560 
2561 
2562 
2563 

2564 

2565 

2566 

2567 
2568 
2569 
2570 
25 71 
2572 
25 7 * 

2574 



MACRO Ml 200 
CKTRAP 



15 MAR 04 09 {15 PAGE 



SEQ 67 



.SBTTt GLOBAL SUBROUTINE - CKTRAP - 

#*********#*#*#******##********##********'«***********#**#**************#***♦** 

♦ CHECK TRAP ROUTINE 

* THIS SUBROUTINE IS USED TO CHECK FOR A BUS TIME-OUT TRAP (004 TRAP) 

♦ WHICH IS CAUSED BY AN ACCESS TO A NON-EXISTENT MEMORY OR I/O LOCATION. 

* IF THE TRAP DOES NOT OCCUR, THIS ROUTINE RETURNS A SUCCESS INDICATION. 

RO SOURCE ADDRESS FOR MOVF . 

Rl - DESTINATION ADDRESS FOR MOVE. 

CRO) - SOURCE FOR THE MOVE. 



(Rl) - WRITTEN TO THE CONTENTS OF CRO). 

CARP.r FLAG - SET ON RETURN IE NO 00* TRAP DETECTED. 

TP4FLG - NONZERO IE TRAP OCCURRED, CLEARED OTHERWISE. 



* INPUTS} 

* 

* OUTPUTS t 

* CALLING SEQUENCE: 
* 

* COMMENTS: IE THIS SUBROUTINE CAUSES A TRAP, EITHER THE ADDRESS WHICH 

* IS LABELED ADRPTR WILL BE THE. TRAP PC ADDRESS ON THE STACK. 
♦ 

* SUBORDINATE ROUTINES CALLED: NONE. 

*♦♦♦♦*♦♦♦♦ + »* + *** + ♦♦ + ***■*♦♦*♦ + *♦*♦**♦***♦♦******♦***•**•****•*************** + * 



JSR 



PC. CKTRAP 



017752 
017752 
017756 
017 762 
017/64 
017770 
017/72 
017/ 74 
017/76 
017/76 
02000Q 



00456/ 
005067 
011011 
005 76 7 
000261 
001401 
00024 1 

004/36 
000207 



164020 
1625*6 

162530 



CKTRAP:- SAVE 



ADRPTR j 



60tj 





JSR 


CLR 


TP4FLG 


MOV 


CRO).(Rl) 


TST 


TP4ELG 


SEC 




BEG 


60$ 


CLC 




PASS 





RTS 



PC 



JSR 



j SAVE CONTENTS OE GPRS RO THRU R5. 

R5.PREG05 i CALL REGISTER SAVE SUBV . 

i CLEAR THE 004 TRAP FLAGS. 

, PERFORM THE MOVE IN QUESTION. 

j CHECK FOR OCCURENCE OK TRmP, 

iINOICATE SUCCESS. 

lEXIT WITH SUCCESS IF TRAP DID NOT OCCUR. 

iINOICAU FAILURE* 

iRtSTOPt GPRS, 

PC.WSP)* iRETURN TO PREG05 SUBRT. 



IX: 



6t8IM K \tWo<!>h^ NC 



C TST PARTI 



MA 



EPHrB* 2 
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SEO 68 



05 :* 

05.v 

05 *8 

0580 
0581 

056 5 
0584 
0585 
0586 

058 .' 
0588 
058 v * 
0590 
OS l *l 
OVV 

0595 
0594 
0595 
05^6 
0^9 ' 
0598 
0599 
0600 
06O1 
2600 
0605 

0604 000000 
000002 
0605 
0606 
060 ; 
06O8 

0609 000006 

0610 000010 
0611 

0610 

36 IS 

0614 000014 

0615 

0616 000000 

0617 000000 
000000 

OM* 

0619 000002 



004567 163770 



004 76 7 
105002 



001544 



004 76 7 000502 

004756 
00000 7 



.SBTTl GLOBAL SUBROUTINE - CLNRST 

ft**************************************************************************** 

- CLEAN RESET OF THE DEVICE UNDER TEST 
THIS SUBROUTINE IS USED TO RESET THE OUT TO A KNOWN STATE. 
THE OUT' 5 SELF -TEST IS SKIPPED, AND THE FIFO IS PURGED OF ANY ERROR 

COOES, ETC. 

IF THE RCSET DOES NOT SUCCESFULLY COMPLETE. THEN THE CARRY BIT I'.. 

PASSED BACK TO THE CALLING ROUTINE (CLEAR), 

INPUTS: CSRA - CONTAINS THE ADDRESS OF THE CSR 

TXBFCA - CONTAINS ADDRESS OF OUT DMA BUFFER COUNT REGISTER. 
ERRN8R - ERROR NUMBER FOR POSSIBLE ERROR REPORT. 
ERRTBL- ERRTYP.ERNBR.AND ERRMSG SET DP CORRECTLY. 

OUTPUTS; THE OUT PERFORMS ITS RESET FUNCTION INTO A KNOWN STATE. 
CARRY CLEAR INOICATES THE TEST IS TO BE ABORTED. 
ERRBLK - VALUE MAY BE DESTROYED. 
IESTAT - TX AND RX INTERRUPT FLAGS ARE CLEARED. 
TX AND RX INTERRUPT ENABLE BITS IN THE OUT • S CSR ARF CLEARED. 



CALLING SEQUENCE; 
COMMENTS: 



JSR 



PC, CLNRST 



THIS SUBROUTINE CAN REPORT ERRORS UITH NUMBERS ERRNBR. 
THIS ROUTINE DOES NOT DESTROY TH€ VAl UE OF ERRNBR. 

SUBORDINATE ROUTINES CALLED: DELAY ,MSLGE T , PUT IFO.RESE T T . 



JSR 



,SAVE CONTENTS OF" GPRS RO THRU R5. 
R5.PREG05 jCA.L REGISTER SAVE SU8RT. 



CLNRST:: SAVE 

J * 

{ RESET THE OUT. 

j THIS ROUTINE REPORTS ERRORS WITH NUMBERS FROM ERRNBR THRU E.RRNBR'O. 

t • 

JSR PC.RESETT , RESET THE DUT TO A KNOWN STATE. 

BCC 601 jEXIT ROUTINE WITH ABORT TEST INDICATOR. 



; 



PURGE THE FIFO OF ERROR COOES, SAVE ANY BMP CODES FOUND, 



J • 



60$: 



JSR 

PASS 

RTS 



PC.PUFIFO 



JSR 



PC 



j PURGE THE FIFO, 

jEXIT THE TEST USING RESET T OR PUFIFO STATUS. 
, RESTORE GPRS, PASS THE FOLLOWING INTACT: 
PC.atSP)* (RETURN TO PREGOf- SUtfRT 

,CARRt BIT : IF CLEAR, THEN ABORT THE TEST. 



fcr"6 



CZDHUBO DHU-11 fUNC TST PARTI 
GLOBAL SlBROUUNE 



MACRO M1200 15-MAR-84 09:15 PAGE 57 
• CLR16W 



SEQ 69 



2621 
2623 

2t»24 
2625 

2626 
262 : 

2628 
2fe2** 

2630 
2*31 

2633 
2634 
2b35 
2636 

2637 020024 
020024 

2638 020030 

2639 020034 

2640 020036 

2641 020040 

2642 02OO42 
020042 

2643 020044 



004567 
012701 
005020 
005301 
001375 

004 736 
000207 



163746 
000020 



SBTTL. GLOBAL SUBROUTINE - CLR16W - 

* - CLEAR SIXTEEN WORDS ROUTINE 

* THIS SUBROUTINE CLEARS 16 WORDS STARTING WITH THE SPECIFIED WORD. 

* INPUTS: RO - ADDRESS OF THE FIRST WORD TO CLEAR. 

* OUTPUTS: (RO) TO (R0*15) - 16 WORDS OF MEMORr ARE CLEARED TO 0. 
* 

* CALLING SEQUENCE: JSR PC.CLR16W 

* COMMENTS: 

♦ 

* SUBORDINATE ROUTINES CALLED: NONE. 

-. *+******++**+***♦****+******+*****+******+**+****+•******•*++*•♦***+*+****♦ 

i SAVE CONTENTS OF GPRS RO THRU R5, 
JSR R5.PREG05 >CALL REGISTER SAVE SUBRT. 

{SET THE LOOP COUNTER TO 16. 

{CLEAR A WORD OF MEMORY. 

{COUNT THIS LOOP. 

{LOOP IF NOT 16 WORD .'.EARED. 

{RESTORE GPRS. 
JSR PC3CSP)* {RETURN TO PREG05 SUBRT 



CLR16W: 


; SAVE 






MOV 


016. .Rl 


PS: 


CLR 


(RO)* 




DEC 


Rl 




BNE 


2$ 


60$; 


PASS 





RTS 



PC 



\~ 



h 



C/DHUBO DHU-U FUNC TST PARTI 
GLOBAL SUBROUTINE 



NA ^?E^ 20 ° 



15-MAR-84 09:15 PAGE 58 



SEQ 70 



J!h4S 
2646 
264 ? 
2648 
2649 
2650 
2651 

265v> 

2653 

2654 
2655 
2656 
265 " ? 

2658 
2659 
2660 
2661 
2662 
2663 
2664 
2665 
2666 
266? 
2668 

2669 
2670 
2671 
2672 
2673 
2674 
26^5 
26/6 
26 7 7 
2678 
26 79 
2680 
2681 
2682 
2683 
2664 
2685 

2686 



020046 
020046 



020052 
020054 
020060 
020062 
020064 
0200/0 
020074 
020076 
020102 
020 104 
020106 
020110 
020116 
020120 
020120 
020122 



O06305 
016501 
005201 
103402 
010165 
00576 7 
001411 
020167 
101002 
000241 
000404 
056567 
000261 

004 7 36 
000207 



BTTl GLOBAL SUBROUTINE - CNTERR - 

♦ A************************************************************************** 

- COUNT ERROR ROUTINE - 
THIS SUBROUTINE IS USED TO COUNT A "DATA" ERROR ON THE SPECIFIED 
LINE. IT CHECKS WHETHER ERROR SUMMARY REPORTING IS ACTIVE, OR SHOULD 
DE MADE ACTIVE ON THIS LINE, AND ACTIVATES IT IF NECESSARY. 

INPUTS: R5 - LINE NUMBER OF LINE UNDER CONSIDERATION. 

ERCNTB - LABEL AT BASE OF ERROR COUNTERS TABLE. 

ERSMRF - ERROR SUMMARY FLAGS OIT SET IF LINE IN SUMMARY MODE). 

NDERPT - NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE. 

OUTPUTS: CARRY - SET IF LINE IS IN ERROR SUMMARY MODE. 

ERCNT - ERROR COUNTER INCREMENTED FOR SPECIFIED LINE. 
ERSMRF - BIT SET IF LINE SHOULD BE IN SUMMARY MODE. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC.CNTERR 



SlfcORDINATE ROUTINES CALLED: NONE. 

♦♦♦♦♦♦A******************************************************************** 



004567 163724 



CNTERR:: SAVE 

i 



{SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 {CALL REGISTER SAVE SUHRT. 



002464 



002464 
162132 

162124 



002410 162344 



COUNT THE ERROR ON THE COUNTER FOR THE SPECIFIED LINE. 

»FORM WORD OFFSET FROM LINE NUMBER, 

{GET THE PRESENT ERROR COUNT FOR THIS LINE. 

j COUNT ERROR. 

{OVERFLOW? YES, DON'T UPDATE COUNTER IN TABLE. 

{UPDATE ERROR COUNTER TABLE ENTRY. 

j SUMMARY 5 DISABLED? YES, EXIT WITH CARRY 0. 
{NO, CHECK FOR ENOUGH ERRORS FOR SUMMARl USE. 
{ENOUGH ERRORS TO USE SUMMARY? YES, GO HANDLE. 
{INDICATE NOT TO USE SUMMARY REPORT YET. 
{EXIT WITH CARRY 0. 
V {SET THE ERROR SUMMARY FLAG FOR LINE. 

jINOICATE TO USE SUMMARY REPORT. 
iRESTORE GPRS. 
JSR PC,H(SP)» {RETURN TO PREG05 SUBRT 

RTS PC 





ASL 


R5 




MOV 


ERCNTBCR5),R1 




INC 


Rl 




BCS 


?i 




MOV 


R1.ERCNTBCR5) 


2$: 


TST 


NDERPT 




BED 


60i 




CMP 


Rl, NDERPT 




BHI 


4$ 




CLC 






BR 


60$ 


4$: 


BIS 

SEC 


BITTBL(R5),ER 


60$: 


PASS 





!/DHUHO DHL" 11 fUNC TST PARTI 
>LOBAL SUBROUTINE 



2688 
268<* 

26*0 
2t>^I 
26<*2 

26^3 
26<*4 
26*S 
2696 

2698 
2699 
2700 
2 701 

2 ro2 

2703 
2704 

2705 
2706 



MACHO M1200 
- DELAY •■ 



IS MAR -84 09:15 



G6 

PAGE 59 



SEQ 71 



270 7 
2708 
t ??09 
2710 
2711 
2712 
2713 
2714 

2715 
2 -'16 
2717 



020124 
0201.24 
020 HO 
020132 
0201.™ 
020140 
020144 
020150 
020152 
020156 
020156 
020160 



004567 
010401 
012702 
005003 
012704 
00476 7 
103002 
004767 

004 736 
000207 



163646 

177777 

020162 

000130 

000136 



SBTTL. GLOBAL SUBROUTINE - DELAY 

* - DELAY SUBROUTINE - 

* THIS SUBROUTINE IS USED TO DELAY A VARIABLE NUMBER OF MILLI -SECONDS. 
* 

* INPUTS: R4 - CONTAINS THE NUMBER OF MS TO OELAY, 

* MSLCNT. 
* 

* OUTPUT St NONE. 

* 

* CALLING SEQUENCE: JSR PC, DEL AY 
* 

* COMMENTS: IF NO HARDWARE CLOCK INTERRUPTS ARE OCCUR.ING, CONTROL -CS WILL 

* NOT BE HONORED FOR THE DURATION OF THE DELAY. 
* 

* SUBORDINATE ROUTINES CALLED: NONE. 



DELrAY:; SAVE 



020162 177777 



60$ 



62$ 





JSR 


MOV 


R4,R1 


MOV 


1.R2 


CLR 


R3 


MOV 


062$ ,R4 


JSR 


PC .MSLOOP 


BCC 


60$ 


JSR 


PC, OOPS 


PASS 






JSR 


RTS 


PC 


.WORD 


• 1 



j SAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 i CALL REGISTER SAVE SUBRT. 

{PASS NUMBER OF MS DELAY AS TIME-OUT VALUE. 

j TELL MSLOOP ROUTINE TO CHECK ALL BITS, 

;TELL MSLOOP RTN TO CHECK FOR ALL BITS CLEAR. 

{TELL MSLOOP TO CHECK DUMMY NON -ZERO WORD. 

; DELAY THE REQUESTED OF MS. 

;EXIT ROUTINE IF UE TIMED -OUT.] 

I IF NO TIME OUT, BAD PROGRAM OR HOST MACHINE. 

{RESTORE GPRS. 

PC.a(SP)* {RETURN TO PREGQ5 SUBRT. 



{DUMMY, NONZERO WORD. 



£tW°sP»h^ NC 



TST PARTI 



MA 



®m 



200 15-MAR-84 09:15 



H6 
PAGE 60 



SEQ 72 



2'71<> 
2 720 
2/21 
2 722 
2723 
2724 
2 72S 

*. < CO 

272' 

272^ 
2 730 

2/31 

2 752 
2 733 
2754 
2?3S 
2. '36 
2/3' 
2*38 
2739 
2740 
2 741 
2742 
2 74 3 
2/44 
2745 
2746 
2 74 7 
2 748 
2 749 
2 /SO 
2 7<U 

2/fi2 
2/ r >* 
2/S4 
27SS 
2 756 
2/5/ 

2758 
2/59 
2 760 
2 761 
2 762 
2 76 5 
2764 
2/65 
2 766 
2 76 7 
2 768 
2 769 
2 7 70 
2 7 71 

2/72 
2 m 

2?74 



020164 
020164 



020170 
020172 



0201 /4 
0201/6 
020200 
020202 
020206 
020210 
020212 
020214 



00456/ 163606 



005102 
040203 



005/01 

001011 

011400 

01006 7 000070 

040200 

02000' 

00C2M 
001420 



BTTL GLOBAL SUBROUTINE 



MSLGET - 



♦ * 



- MILLI SECONDS LOOP WHICH RETURNS READ WORD AND REMAINING TIHE - 

THIS SUBROUTINE IS A GENERAL PURPOSE TEST LOOP SUBROUTINE. Ii IS USED 

TO VERIFY THAT A CERTAIN ACTION OCCURS BEFORE A TIME-OUT PERIOD. THE 

CALLING ROUTINE PASSES IN WHICH BITS SHOULD BE SET AND CLEARED FOR THE 

DESIRED CONDITION AND THE TIME-OUT VALUE IN MILLI -SECONDS . 

THIS ROUTINE CHECKS FOR THE DESIRED CONDITION UPON ENTRANCE INTO THE 

ROUTINE AND THEN ONCE EACH MILLI -SECOND THERE AFTER. 

UPON RETURN, THE LAST WORD WHICH WAS READ TO CHECK FQR THE CONDITION 

IS RETURNED BY THIS SUBROUTINE. 



INPUTS 1 



Rl - TIME-OUT VALUE IN MILLI -SECONDS CUP TO 64K MS). 

R2 - BIT MAP OF BITS TO TEST CI INDICATES TO TEST THE BIT) 

R3 - DESIRED STATES OF THE INDICATED FIELDS IN R2, 

R4 - ADDRESS OF THE WORD TO TEST. 

MSLCNT - MILLI SECOND SOFTWARE LOOP COUNT . 



OUTPUTS: 



RO 
Rl 

CARRY 



THE LAST UOiil') l,.;i;M WAS READ TO CHECK FOR THE CONDITION. 
REMAINING NUT1ULR OF MS IN TIME-OUT TIME. 

SUCCESS FLAG CSET IF CONDITION IS MET BEFORE. TIME-OUT) 



CALLING SEQUENCE: 



JSR 



PC.MSLGET 



COMMENTS 



THIS ROUTINE WORKS WITH OR WITHOUT A HARDWARE CLOCK, BUT THE 

CALIBRATION IS ONLY liUARENTEED WHEN A LINE CLOCK IS AVAILABLE 

ON THE SYSTEM, 

THIS ROUTINE CAN BE USED AS A DELAY ROUTINE, BY SPECIFYING THV. 

DESIRED DELAY AS THE TIME -OUT AND SPECIFYING A CONDITION TO 

LOOK FOR WHICH WILL NOT BE MET DURING THE DELAt . 

IF A TIME-OUT VALUE OF IS SPECIFIED, THIS ROUTINE CHECKS FOR 

THE DESIRED C0N01TI0N BEFORE RETURNING. IT INDICATES SUCCESS 

IF THE CONDITION IS MET, FAILURE OTHERWISE. 



SUBORDINATE ROUTINES CALLED; NONE. 



MSl.GET:: SAVE 



JSR 



j SAVE CONTENTS Of GPRS RO THRU &5 . 
R5.PREG05 j CALL REGISTER SAVE SUBRT. 



1 SET UP MASK FOR REMOVING UNUSED BITS IN THE TEST WORD. AND CLEAR UNUSED 

5 BITS IN THE DESIRED STATE WORD TO ALLOW DIRECT COMPARISON. 
j - 

COM R2 1 GET MASK OF LMUSED BUS. 

BIC R2.R3 {MASK OUT UNUSED BITS IN DESIRED STATE WURD. 

! HANDLE THE TEST AND EXIT IF WE HAVE A TIME-OUT VALUE. 

TST Rl j TEST THE TIME OUT VALUE FOR ZERO. 

BNfr 21 J IF NONZERO TIME-OUT, GO LOOP AND TEST. 

MOV CR4),R0 j GET THE WORD TO TEST BEFORE EXITING. 

MOV R0,62$ j SAVE VALUE SO WE CAN RETURN IT. 

HIC R2.R0 j MASK OUT UNTESTED BITS OF WORD. 

CMP R0.R3 [COMPARE AGAINST DESIRED STATE WORD, 

',IC 1 INDICATE SUCCESS IN CASE WORDS ARE f.OUAL . 

BEQ 6i {EXIT WITH SUCCESS IF WORDS ARE EOUAl . 



&M°s?«W 



NC TST PARTI MACRO, M1200 15-MAR 84 09:15 



WM 



16 

PAGE 60-1 



SEU 73 



2 7 75 
27 76 
2 / 7 •' 
2 7 78 
27 79 
2 780 
2781 
2 782 
2783 
2784 
2785 
2 786 
278 7 
2788 
2 789 

2 790 
2791 

2 792 
2 793 
2 794 

2/95 
2 796 
279' 



2798 
2799 
2800 
2801 
2802 
280* 
2804 



020216 
020220 



020222 
020226 
020230 
020234 
020236 
02C240 
020242 
020244 
020246 
020250 
020252 
020254 



020256 
020262 

020262 
020266 
020272 



00024 1 
00041b 



016705 162130 

011400 

010067 000042 

040200 

020003 

000261 

001405 

005305 

001367 

005301 

00136? 

00024 1 



016700 00001^ 



010066 
01016b 
004736 



020274 000207 



020276 000000 



000002 
000004 



CLC 
BR 



6* 



, INDICATE FAILURE (TIME-OUT). 

{EXIT WITH FAILURE, WORDS AREN'T EQUAL. 



NON-ZERO TIME-OUT vAi.UE . LOOP, WAITING FOR CONDITION OR TIMEOUT. 



2*: MOV 
4$j MOV 
MOV 
BIC 
CMP 
SEC 
BEQ 
DEC 
BNE 
DEC 
BNE 
CLC 

I HAVE EITHER 

, RESTORE THE 



6*2 

60$ 



MOV 
PASS 



MSLCNT.R5 

(R4),R0 

R0.62* 

R2.R0 

R0.R3 

6$ 
R5 
4$ 
Rl 

2 5 



j LOAD MS LOOP COUNT. 

I GET THE WORD TO TEST . 

j SAVE WORD IN CASE THIS IS THE LAST. 

{MASK OUT UNTESTED BITS OP WORD. 

I COMPARE AGAINST DESIRED STATE WORD. 

iSET CARRY IN CASE OF SUCCESS. 

jEXIT WITH SUCCESS IF WORDS ARE EUUAL. 

l COUNT DOWN THE INSIDE MS LOOP COUNT. 

{LOOP IF MS NOT UP. 

{DECREMENT THE MS TIME COUNT. 

I IF TIME NOT UP, LOOP TO COUNT ANOTHER 

{CLEAR CARMr, WE TIMED OUT, 



MS 



FOUND CONDITION. OR TIMED-OUT (POSSIBLY FROM TIME OUT VALUE) 
LAST CONTENTS READ FROM THE TEST WORD. EXIT ROUTINE. 



62J.R0 
R0.R1 



{PASS OUT THE 
{RESTORE GPRS 
MOV RO.ROSLOT(SP) 
MOV R1.R1SL0TCSP) 
JSR PC.a(SP)» 
RO 
Rl 



PC 



LAST READ WORD. 
EXCEPT THE FOLLOWING: 

;PUT RO IN STACK SLOT. 
5 PUT Rl IN STACK SLOT. 
j RE TURN TO PREG05 SUBRT 
LAST READ WORD CHECKED FOR CONDITION. 
REMAINING TIME (0 IF TIME OUT OCCURED). 



I OCAL STORAGE, 



62$: 



.WORD 



CARRY - SET IF SUCCESS, CLEAR IF TIME-OUT. 



{STORAGE FQR THE LAST READ WORD. 



Jf 



C/LWGO DHU-ll KiNC 
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2806 
280/ 

«?8oa 

2809 

2810 

28 n 

2812 

2813 

28 14 

28 IS 

2816 

281 ■' 

2818 

281^ 

2820 

2821 

?8^? 

2823 

2824 

282S 

2826 

282,' 

2828 

282<> 

2850 

28 51 

28 32 

2855 

28 34 

2635 

2836 

28 3/ 

2836 

^839 
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SEQ /4 



.SBTTl GLOBAL SUBROUTINE - MSLOOP - 

**** + + ****** + ******************.**********•*** + ***** + ****♦**•♦*** + ♦****+*» + + +♦ 
- TEST LOOP SUBROUTINE - 

THIS SUBROUTINE IS A GENERAL PURPOSE TEST LOOP SUBROUTINE. II IS USED 
TO VERIFY THAT A CERTAIN ACTION OCCURS BEFORE A TIME-OUT PERIOD. THE 
CALLING ROUTINE PASSES IN WHICH BITS SHOULD BE SET AND CLEARED FOR THE 
DESIRED CONDITION AND THE TIME OUT VALUE IN MILLI -SECONDS . 
THIS ROUTINE CHECKS FOR THE DESIRED CONDITION UPON ENTRANCE INTO THE 
ROUTINE AND THEN ONCE EACH MILLI -SECOND THEREAFTER. 



INPUTS: Rl - TIME-OUT VALUE IN MILLI SECONDS (UP TO 64 K MS). 

R2 - BIT MAP OF BITS TO TEST (1 INDICATES TO TEST THE BIT), 

R3 - DESIRED STATES OF THE INDICATED FIELDS IN R2. 

R4 - ADDRESS OF THE WORD TO TEST. 

MSLCNT - MILLI SECOND SOFTWARE LOOP COUNT. 

OUTPUTS; CARRY - SUCCESS FLAG CSET IF CONDITION IS MET BEFORE TIMF-OUT). 

CALLING SEQUENCE: JSR PC, MSLOOP 

COMMENTS; THIS ROUTINE WORKS WITH OR WITHOUT A HARDWARE CLOCK, BUT THE 

CALIBRATION IS ONLY GUARENTEED WHEN A LINE CLOCK IS AVAIL. AB! E 
ON THE SYSTEM. 

THIS ROUTINE CAN BE USED AS A DELAY ROUTINE, BY SPECIFYING THE 
DESIRED DELAY AS THE TIME-OUT AND SPECIFYING A CONDITION TO 
LOOK FOR WKICH WILL NOT BE MET DURiNG THE DELAY. 
IF A TIME OUT VALUE OF IS SPECIFIED, THIS ROUTINE CHECKS FOR 
THE DESIRED CONDITION BFFORE RETURNING. IT INDICATES SUCCESS 
IF THE CONDITION IS MET, FAILURE OTHERWISE. 

SUBORDINATE ROUTINES CALLED: MSLGET. 

*****#***#*** + *♦ + ****** + * + « + + ***♦**♦. + *♦♦* + ♦ + + ♦**«**♦*****#*♦*** + * + * + #****** + * 



020300 
020300 



2840 
2841 
2842 
284 3 
2844 
284 S 

2846 
284 7 

2848 



004567 163472 



MSLOOP: : SAVE 



JSR 



jSAVF CONTENTS OF (,f>RS RO THRU RS 



RS.PRE.GO! 



;CALL REGISTER SAVE SUBRT. 



020304 004 76 7 177650 



CALLING THE MSLGET ROUTINE F ROM THE MSLOOP ROUTINE ISOLATES THE CALLER OF 
MSLOOP FROM THE RF : TURNED TEST WORD AND REMAINING TIME -OUT VALUES. 



020310 
020310 
020312 



004 7 36 
000207 



60$: 



JSR 

PASS 

RTS 



PC. MSLGET 

JSR 
PC 



jCAll THE MU U -PURPOSE MS LOOP AND SEARCH RTN. 

i RES TURF GPRS, 

PC.aCSPU jrJEKiRN TO PRtGOS SUBRT 

jCARRt - SET IF SUCCESS. CLEAR IF TINE OUT. 
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2850 

2851 
2853 

2854 

2855 
285b 
t ^8 c ) ' 
2858 
285^ 
2860 
2861 
2862 
286 3 

2865 
286b 
28b / 

2868 
2869 



2870 
2871 



28 72 
2873 



28 74 

28 75 

28 76 

2877 
28 /« 
2879 



020314 
020314 

020320 
020320 
020322 

020324 
020326 

020330 

020330 
020334 
020340 
020342 
020344 
020350 
020350 
020352 
020354 
020354 
020356 

020360 
020363 
020366 
020371 
020374 
0203/7 
020402 
020405 
020410 
02C4 13 
020416 
020421 
020424 
020427 
0204 32 
020435 



004567 163456 



104454 
000145 
020360 
000000 



012746 
012746 
010600 
1044 W 
062 706 

104422 
000776 

004 736 
000207 

110 

117 
125 
122 

101 
127 
105 
122 
117 
127 
105 
125 
105 
1W 
124 



020444 
000001 



000004 



117 
040 
115 
124 
040 
122 
101 
040 
040 
106 
101 
040 
10 7 
116 
125 
105 
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SF.Q 75 



123 
103 
120 
105 
110 
104 
122 
117 
123 
124 
122 
102 
040 
103 
116 



.SOT II. GLOBAL SUBROUTINE - OOPS 

{♦ PROGRAM ABORT SUBROUTINE 



THIS SUBROUTINE IS USED TO ABORT THE PROGRAM WHEN A FATAL ERROR IS 
DETECTED IN THE PROGRAM OR THE HOST SYSTEM HARDWARE. AN ERROR MESSAGE 
IS PRINTED GIVING SOME INFORMATION ABOUT THE NATURE OF THE ABORT. 

Ri ERROR CODE GIVING REASON FOR ABORT. 



AN ERPOR MESSAGE IS PRINTED, 

A LIST OF RETURN PC VALUES FOR ALL SUBROUTINE CALLS IS PRINTED. 



JSR 



PC, OOPS 



♦ INPUTS: 

4 

{♦ OUTPUTS: 
;♦ 

i* 

} * CALLING SEQUENCE: 

J* 

,♦ COMMENTS: 
* 

♦ SUBORDINATE ROUTINES CALLED: NONE. 

-- *** + *** + *** + ********* + .> + *******•#**** + * + **♦ + *************** + * + **•** + + *■* + + ** 

OOPS:: SAVE j SAVE CONTENTS OF GPRS RO THRU R5. 

JSR R5.PREG05 jCALL REGISTER SAVE SU6R T , 
; REPORT "HOST COMPUTER HARDWARE OR SOFTWARE BUG ENCOUNTERED." ERROR. 
ERRSF 101,EM0101 

TRAP 
.WORD 
.WORD 
.WORD 
j REPORT "PROGRAM HUNG, WAITING FOR A CONTROL-C." 
PRINTF 0EM0102 

MOV 
MOV 
MOV 
TRAP 
ADD 
{LOOK LOR OPERATOR CONTROL-C INPUT. 

TRAP 
5 INFINITE LOOP. 

;D0N'T NEED THIS, BUT SOMEBODY MA i CHANGE THIS 
PC,8(SP>» ; RE TURN TO PREG05 SUBRT. 

} ROUTINE IN THE FUTURF , SO BE CONSISTANT, 



2$: 

60$ 



BREAK 

BR 
PASS 

RTS 



CSERSF 
101 

EM0101 




#FH0102, -CSP^ 

91, (SP) 
SP.RO 
C$PNiF 
04 , SP 

cuirk 



2$ 



PC 



JSR 



EM0101:: ,ASC1<? /HOST COMPUTER HARDWARE OR SOFTWARE HUG ENCOUNTERED. / 



S3 
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^EQ 76 



'830 



020440 


105 


104 


056 


020443 


000 






020444 


045 


116 


045 EM0102 


02044 7 


101 


120 


122 


020452 


117 


107 


122 


020455 


101 


115 


040 


020460 


110 


125 


116 


020463 


107 


054 


040 


020466 


127 


101 


111 


0204 71 


124 


111 


116 


0204 74 


107 


040 


106 


0204 / 7 


117 


122 


040 


020502 


101 


040 


103 


020505 


117 


116 


124 


020510 


122 


117 


114 


020513 


055 


103 


056 


020516 


040 


74 


052 


020521 


05? 


052 


052 


020524 


052 


052 


052 


020527 


052 


052 


052 


020532 


052 


052 


052 


020535 


045 


116 


045 


020540 


116 


000 





ASCIZ /rfNKAPROGRAM HUNG, WAITING FOR A CONTROL -C, < +*+* **********N*N/ 



2tf«l 



EVF.N 



M6 
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SEQ 77 



,-885 
2884 
2885 
2886 
2887 
2888 
2889 
2890 
2891 
289? 
2893 
2894 
2895 
2896 
2897 
2898 
28^9 

2900 
2901 
2902 

2903 

2904 
2905 
2906 
2907 
2908 
2909 
2910 
2911 
2912 
2913 
2914 
2915 
2916 
2917 
2918 
2919 
2920 
2921 
2922 
292* 
2924 
2925 
2926 
292 7 
2928 
2929 

2930 
2931 



020542 
020542 
020546 
020552 

020556 
020560 



020562 
020566 
020570 



020572 

020576 
020600 
020602 

020606 

020610 
020612 

020614 
020616 

020620 
020620 

020622 



004567 
012701 
016704 

011402 
100016 



012700 
040200 
001002 
004 767 

005301 
00136? 
000241 
000401 
000261 



004 7 36 
000207 



163230 
001000 
161466 



012700 070000 

040200 

001006 



000301 
001470 



SBTTL GLOBAL SUBROUTINE - PUFIFO - 

+ + * * * * + 4 * + * + * * * ♦ * * * * * + * * * * * + * * + * * * 4 * * * *** A * * * 4t A * * * * * * * 4* * * * * *■ * * A * * * * * 4 * *A* * A A * 

♦ - PURGE THE FIFO 

♦ THIS ROUTINE TRIES TO REMOVE ALL THE CHARACTERS FROM THE FIFO, 

♦ ANY BMP CODES THAT ARE FOUND ARE SAVED ON THE BMP CODE QUEUE. 

♦ INPUTS: RBUFA- CONTAINS THE ADDRESS OF THE RECEIVER. 



CARRY BIT - INDICATES THE STATE OF THE FIFO, SET:* PURGED. 
BMPCQ - THE CONTENTS OF THE BMP CODE QUEUE MAY BE UPDATED. 



JSR 



PC, PUFIFO 



♦ OUTPUTS j 

* 

♦ CALLING SEQUENCE; 

* 

♦ COMMENTS: 

a 

♦ SUBORDINATE ROUTINES CALLED: SAVBMP. 



PUFIFO: :SAVE 



JSR 



2$: 



MOV 
MOV 

MOV 
BPL 



0512. ,R1 
RBUFA, R4 

(R4),R2 
6$ 



j SAVE CONTENTS OF GPRS RO THRU R5 . 
R5,PREG05 jCALL REGISTER SAVE SUBRT. 

j SET MAXIMUM TRY COUNT OF 512. 
{GET ADDRESS OF THE RECEIVER BUFFER REGISTER. 

{GET THE CONTENTS OF THE RECEIVER BUFFER REG. 
;EXIT IF THE FIFO IS EMPTY, DATA. VALID CLR. 



CHECK IF THE READ CHARACTER IS ACTUALLY A BMP CODE. 
IF IT IS, THEN SAVE IT ON THE BMP CODE QUEUE TO BE REPORTED LATER. 



MOV 
BIC 
BNE 



070000, RO 

R2.R0 

4$ 



{GENERATE A BIT MAP OF CHAR FRROR BITS 

s WHICH ARE NOT SET FOR CHAR, 

{THROW CHAR AWAY IF NOT BMP OR SELFTEST CODE. 



CHECK IF THE READ DATA IS MODEM STATUS , BMP OR SELFTEST?. 



} - 



4$: 

6$: 

60$ 



MOV 
BIC 

BNE 

JSR 

DEC 
BNE 

CLC 
BR 

sec 

PASS 

RTS 



0301.R0 

R2.R0 

4$ 

PC. SAVBMP 

Rl 
2$ 

60$ 



JSR 



PC 



; CHECK IF BMP. 

{TRY TO CLEAR BMP FLAGS IN THE READ DATA. 

{IF IT IS MODEM OR SELFTEST CODE THROW IT AWAY. 

{SAVE BMP CODE ON THE QUEUE. 

{DECREMENT THE TRY COUNT. 

{LOOP TO TRY AGAIN. 

{CLEAR CARRY, TO INDICATE FIFO NOT PURGED, 

{EXIT WITH CARRY Ct.FAR, 

jSET CARRY. TO INDICATE FIFO PURGED. 

{RESTORE GPRS, 

PC.5K5P)* {RETURN TO PRFG05 SUBRT 

{CARRY BIT, SET INDICATES FIFO PURGED. 



Nf> 
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SEQ 79 



2933 

2**35 

2936 

2 , >s: 
2938 

2959 
2940 
2941 

294,: 
29* 5 

2944 

2945 
2946 

294 / 
2<M 8 
2**49 
2950 
2951 
2952 
2953 
2954 
2955 
2956 

295 7 
2958 
2959 

2960 
296 1 
2962 
2963 
2964 
2965 
296d 
296/ 
2968 
2969 
29/0 
29 / 1 
29/2 

297 3 

2974 
29/5 

29/6 
29// 
29/8 
29/9 
2960 
2981 
2982 
2983 
2984 

298 S 
2986 
298 / 
2988 



SB 

4 
♦ 

+ 
♦ 
4 
4 
* 
4 
4 
4 
4 
4 
4 
4 
4 
4 
♦ 

4 
* 
4 

4 

+ 

* 

4 

4 

* 

4 

4 

* 
1 + 
J* 

;* 
J* 

I 4 



TTL GLOBAL SUBROUTINE: 



RDPOR 



Ml. bLUDML ^UDMUUIilNC. * HL>rim ■ 

44*******444****>***********4*4**********4****4******4******44**+*****+*4*+4 

- r«EAD AND VERIFY DATA PATTERN FROM DEVICE REGISTERS ROUTINE 

THIS ROUTINE RF.AOS AND VERIFIES THE ROTATED DATA PATTERN WHICH HAS 

BEEN WRITTEN BY THE WDPDR SUBROUTINE. 

EACH ACTIVE LINE'S REGISTER'S CONTENTS IS READ AND COMPARED WITH THE 

WRITTEN DATA. 

AFTER THE UNUSED AND READ ONLY CRO) BITS ARE MASKED OUT, ANY ERRORS ARE 

REPORTED FROM THIS ROUTINE. 

THIS ROUTINE WILL TAKE INTO ACCOUNT THE TYPE OF WRITF. OPERATION WHICH 

WAS PERFORMED BY THE WDPDR SUBROUTINE. 



INPUTS; 



R2 - USED TO PASS IN THE DATA PATTERN TO BE ROTATED 6 VERIFIED 
R3 - BYTE INDICATOR ( - ■> LO BYTE, ♦ -> Hi BYTE, ■> BOTH). 
R4 - OPERATION TYPE INDICATOR (- -> BIC, * »> BIS, »> MOV). 



ACTLNS 
CSRA - 
DRADRT 
ERCNTB 
ERRMSG 
ERRNBR 
LPRO - 
NUMLNS 
NOERPT 
TXBFCO 
UNBTTB 



BIT MAP OF 
CONTAINS THE 

- BASE ADDRESS OF DEVICE 

- LABEL AT BASE OF ERROR 

- SET UP WITH THE PROPER 

- SET UP WITH THE PROPER 
EQUATED TO LPR REG OFFSET 



ACTIVE LINES ON THE DEVICE UNDER TEST. 
CSR ADDRESS OF THE DEVICE UNDER TEST. 

REGISTER ADDRESS TABLE. 

COUNTERS TABLE FOR LINES. 

ERROR MESSAGE FOR THIS TEST 

ERROR NUMBER. 
FROM DEVICE CSR ADDRESS. 



- NUMBER iW LINES ON THE DEVICE UNDER l EST. 

- NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE. 

- EQUATED TO TBUFFCf REG OFFSET FROM DEVICE CSR ADDRES5 

- BASE ADDRESS OF THE UNUSED BIT TABLE. 



OUTPUTS: ERROR MESSAGES MAY BE PRINTED AT THE OPERATOR'S CONSOLE. 

ERCNT - ERROR COUNTERS TABLE IS UPDATED FOR LINE UNDER TEST. 
ERRBLK - CONTENTS DESTROYED. 

ERSMRF - ERROR SUMMARY FLAGS BIT SET IF LINE IN SUMMARY MODF . 
UUT CSR - ALL BITS CLEARED, EXCEPT IND.ADR.REG FIELD DESTROYED. 

CALLING SEQUENCE: JSR PC. RDPDR 

COMMENTS: FOR BYTE ACCESSES, ONLY THE SPECIFIED BYTE IS VERIFIED. 

SUBORDINATE ROUTINES CAILFD: ER1601 .ROLDAP . 

444444444****4444*4**.^ 444*4444444*44444444*4444*44444*444444*******444-4* »* ** 



020624 
020624 
020630 



020636 
020640 
020642 



004567 
012767 



005 704 
100001 
005102 



163146 
016416 



RDPDR:: SAVE 
163136 MOV 



j SAVE CONTENTS OF GPRS RO THRU R5 . 
JSR R5.PREG05 S CALL REGISTER SAVE SU6RT. 
0ER1601.F.RRBLK iSET UP THE ADDRESS OF THE ERROR REPORT RTN. 



DETERMINE WHETHER REGISTER DATA SHOULD BE INVERTED FROM DATA PATTERN. 



Till 

BP1. 
COM 



R4 



R2 



020644 005005 



SET UP OUTER LOOP 



$ 



:ir 



R5 



THE OUTER LOOP FOLl OWS 
FROM ALL QF THE DEVICE 



5 CHECK THE OPERAND i'YPl INDICATOR. 

I BIC WRITE PERFORMED? NO. USE STANDARD DATA 

jYES, INVERT THE DATA PATTERN. 



j CLEAR i INE COUNTER TO SELECT t INF 0. 

EACH PASS THROUGH THIS -..OOP READS AND COMPARES DATA 
REGISTERS FOR A PARTICULAR LINE IF THE LINE IS ACTIVE. 



B/ 



CVDHURO DHL' It KING TST PARTI 
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2'*<N 

0*91 
2992 
2993 

299fc 

2998 

£999 
3000 
3001 
300*? 
3003 
3004 
3005 
3006 
3007 
3008 
3009 
3010 
3011 
301? 
3013 
3014 
3015 
3016 
301? 
3018 
3019 

3020 
30*' 1 
3022 
?0r? 1 
3024 

302S 
302(. 

30? / 
3028 
3029 
30 30 
3031 
303? 
3033 
30 54 
3055 
30 36 

303 7 
3038 
3039 
3040 

304 1 
304? 
304' 
3044 



020Mb 
0?065? 
020656 
020660 
02066? 
020670 
020672 



0206 '6 
020 700 
020704 
020710 
020 714 
020716 
020720 
020722 
020724 
020 726 
C20 730 
020/32 
020736 
020 742 
020744 
020 746 
020752 

020 756 
020/6? 

020 764 
0?0 766 
02077? 

020 7 74 
0?0 7 7 4 



020 7 76 
021004 
021006 
021014 

021016 
021020 
021024 
021030 
021034 
021036 
021042 
021046 



01026? 
01057/ 
010500 
006300 
036067 
001467 
012703 



010204 
U4630? 
016300 
005 766 
00100? 
011001 
000416 
1004.10 
005200 
UtOOl 
000301 
042701 
042 70? 
000405 
111001 
042 701 
04270? 

046301 
020102 

0014 14 
004 76 7 
103411 



104460 



03? 767 
001004 
01276' 
0OO425 

010402 

004 76 7 
062 703 
02032 7 
00100? 
062703 
020 3? 7 

003715 



O00222 
1613b4 



002 3 70 
002242 
O0001O 



0003 7 7 
0003 7 7 



17/400 
177400 

002370 
177054 
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SEQ 79 



002410 161340 
000004 



000100 161220 
000001 161270 



000444 
000002 
000006 



00000? 
000016 



MOV 
hQv 
MOV 
ASL 
BIT 
BEO 
MOV 



I SAVE 



THE OUTER LOOP 
CSR IND.ADR.REG 



DATA PATTERN, 
FIELD TO THIS 



LINE 



R2.70* 

R5.UCSRA i SET 

R5,R0 

RO 

BITTBLrRO),ACTLNS 

16* iIS THE LINE ACTIVE? NO, SKIP THE I INE . 

0LPRO,R3 iYES, INITIALIZE REGISTER OFFSET FOR i.PR 



t • 

i 

i 

J 

6*1 



THE INNER LOOP FOLLOWS. EACH PASS THROUGH THIS LOOP READS AND COMPARES 
DATA FROM A DEVICE REGISTER. 



A*} 



10$: 



12* 



MOV 

BIC 

MOV 

TST 
BNE 

MOV 
BR 
BMI 

INC 

MOVB 

SWAB 

BIC 

BIC 
BR 

MOVB 

BIC 

BIC 

BIC 

CMP 
UEQ 
JSR 
BCS 
iNO, REPORT 
ERROR 



R2.R4 

UNBTTB(R3),R2 

DRA0RT(R3),RO 

R3SL0TCSP) 

ft* 

(RO).Rl 

12* 

10» 

RO 

(RO).Rl 

Rl 

0377, Rl 

0377, R2 

12* 

(R0),R1 

0177400, Rl 

01 7 /400, R2 

UNBTTB(R3),R1 

R1.R2 

141 

PC.CNTERR 

141 

"BAD BIT(S) IN 



,SAVE THE INNER LOOP DATA PATTERN, 
iREMOVE LNUSED BITS FROM EXPECTED DATA 



iCHECK THE ACCESS TYPE 
iBYTE ACCESS? YES, GO 
I NO, PERFORM WORD REAO 



INOICATOR. 
PERFORM BYTE READ. 
OF DEVICE REGISTER 



lLOW BYTE ACCESS? YES, GO DO LOW BtTE READ 
,HIGH BYTE ACCESS. FORM HIGH BYTE ADDRESS. 
iREAD THE HI BYTE Of THE DUT REGISTER. 
jPUT HI BYTE BACK INTO THE HI BYTE. 
I REMOVE THE UNUSED BYTE IN ACTUAL DATA. 
jRFMOVE THE UNUSED BYTE IN EXPECTED DATA, 



jREAD THE LOW BYTE 
, REMOVE THE UNUSED 
l FORM EXPECTED LOW 



OF THE DUT REGISTER. 

BYTE . 

BtTE FOR COMAPARISON. 



, REMOVE UNUSEO BITS FROM ACTUAL DATA. 
, COMPARE ACTUAl ANO EXPECTED DATA. 
lACTUAl. - EXPECTED? YES, SKIP ERROR. 
iNO, COUNT THE ERROfl, CHECK FOR ERROR SUMMARY 
I USE ERROR SUMMARY? YES, SKIP ERROR. 
DEVICE XXXXX REGISTER FOR LINE NN ( D K " 



lE XI T THIS ROUTINE ANO SET T HE '"EXIT 
jREPORTING HAS NOT BEEN REQUESTED. 



TRAP 
ON ERROR" FLAG, IF EXTENDED ERROR 



C1ERR0R 



BIT 0BIT06, OPTION 

HNE 141 

MOV Ol.EXOEHR 

BR 60* 

14$: MOV H4.R2 

JSR PC.ROi DAP 

ADD 02, R3 

IMP R 3, Of. I SO 

BNE 151 

ADD 02. R3 

!'•*: CMP H3.0TXHFC0 

HI I f« * 



,HAS EXTENDED 
I BRANCH IE IT 
,SE T r^ EXIT 



ERROR REPORTING BEEN REUUESTEU 

HAS 

ON ERROR FLAG. 



lEXIT THE ROUTINE . 

jRESTORE THE INNER LOOP DATA PATTERN. 

, ROTATE DATA PATTERN LEU , NOT THROUGH CARMt. 

» SET REGISTER OFFSET 10 THE. NEXT REGISTER, 

, CHECK THAT THIS IS NOT THE FIFOSKE DATA RET, 

lAVOID ALTERING THE OFFSET IF IT ISN T 

»POINT AT THE. NEXT REGISTER. 

, COMPARE REG OFFSET WITH Of F St T Of LAST RK'» . 

jlOOP IF NOT All REG DONC' FOR THIS i INE . 



BACK INTO THE OUTER LUUP, NOW SET UP FUR NEXT LINE. uOOP U NOT OONb 













c/ 


BH w sflHWoWitt INC TST 


PARTI 


M m& i;>o ° 


15-MAR R4 


09:15 PA13F 64-2 


304S 0210^0 


016/02 


000020 


16* j 


MOV 


/0*,R2 


5046 021054 


004 76 7 


000410 




JSR 


PC.ROl DAP 


304 7 021060 


005205 






INC 


R5 


5048 021062 


02052 7 


000020 




CMP 


R5 , ONUMLNS 


3049 021066 


00266 7 






BL.T 


4$ 


?oso 












3osi 021070 






60$ j 


PASS 




or l 0/0 


004 736 








JSR 


3ov 0210:2 


000207 






RTS 


PC 


30 S* 












3054 021074 


000000 




70$ t 


.WORD 






rJFT UP TO ROTATf- T Hi [)ATA PATTFHN. 

iROTATE THf DATA PATTERN. 

iCOUNT THIS LINE 

jCOMTARE LINE COUNT WITH NUMBER OF" LINES. 

jlOOP IE SOME I INES NOT DONF , 

jRFSTORF GPRS, 

PC.aCSP)* i RE TURN TO PRF.G05 5UBRT, 

I STORAGE EOR DATA PATTERN CUTSIDE INNER LOOP. 



SFO ao 



SiW sP$kHi^ INC 



TST PARTI 



MA 



fifth!?* 



0/ 
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SEQ 81 



50 r >; 

50 SQ 
5060 
30t>l 
3062 
30t>3 

5065 
30t>6 
506 7 
5068 
5069 

50 70 
50 71 
50'* 2 
50 :3 
50/4 
30/5 
5076 
50 7? 
3078 
50 7Q 
3080 
3081 
5062 

3083 
5084 
3085 
3086 
3087 
30-^8 
3089 
3090 
30<U 
5092 
3093 
3094 
3095 
3096 
3097 
3098 
5099 
3100 
3101 
310? 
3103 
3104 
3105 
3106 
3107 
3108 
3109 
5110 



021076 
021076 



021102 
021106 
021112 
021116 
021120 
02U2H 



021124 
021130 
021134 
021136 
021140 
021142 
021150 
021152 
021154 
021156 
021160 
021166 
021170 
021172 



012705 
012702 
032704 
001001 
005004 



010400 
004767 
016701 
010004 
005404 
005002 
026627 
001401 
005102 
005003 
005000 
02662 7 
001001 
005100 
004767 



C -8TU GLOBAL SUBROUTINE - REGTST - 

REGISTERS TEST SUBROUTINE 
SUBROUTINE TO T EST THE OEVICE UNOER TEST CDUT) REGISTERS, THE USED 
BITS OF THE REGISTERS ARE EITHER ALL CLEARED OR ALL SET AND THEN THE 
DATA PATTERN IS WRITTEN ANO VERIFIED USING EITHER WORD OR BrTE 



004567 162674 



ACCESSES IN READ/WRITE OR READ/MOOIFY/WRITE MODE 



INPUTS? 



OUTPUTS: 



R5 
R4 



BYTE INOICATOR (- •> LOW, ♦ ■> HIGH, -> BOTH BYTES) 
ACCESS MODE (1 -> SET THEN BIC. 1 -> CLEAR THEN BIS, 
(-2 ■> SET THEM MOV, »2 CLEAR THEN MOV). 
ERRNBR - SET UP WITH INITIAL ERROR NUMBER. 



GPRSO - GPR SAVE AREA IS JESTROYED. 

DEVICE UNOER TEST REGISTERS ARF WRITTEN. 

ERROR MESSAGES MAY BE PRIMED AT THE OPERATORS CONSOLE 



CALLING SEQLtNCE 



JSR 



PC, REGTST 



COMMENTS: 



LOOP 16 TIMES WRITING THE SAME DATA PATTERN 
ONCE EACH ITERATION. 
THIS ROUTINE CAN REPORT ERRORS INITIAL ERRN8R THRU INITIAL -2 



THIS ROUTINE 
ROTATED LEFT 



SUBORDINATE ROUTINES CALLED: RDPDR.ROLDAP. SWAPO, WDPDR 






GTST:: SAVt 



JSR 



j SAVE CONTENTS OF GPRS RO THRU P5. 
R5.PREG05 {CALL REGISTER SAVE SUBRT 



SET UP THE G r 'R> c OR THE WRITTING OF THE DATA PATTERN. 



000020 
167410 
000001 



MOV 016., R5 

MOV ft).67410,R2 

BIT «-:ii'O r R4 

BNE 21 

CLR R4 



16 ITERATIONS 



$: 



j SET UP LOOP COUNTER TO COUNT 

{INITIALIZE THE DATA PATTERN. 

{TEST FUR R'W ACCESS. 

,R/M/W ACCESS? YES. R4 IS ALL SET UP . 

{NO, INDICATE R/W ACCESS. 



SET UP THE GPRS FOR THE CLEARING OR SETTING OF All. THE USED BITS 



001272 
162634 



000012 000002 



000012 
001224 



17/776 



4t 
M 

; ► 

i 



MOV R4.R0 

JSR PC, SWAPO 

MOV ERRNBR ,R1 

MOV R0 ( R4 

NEG R4 

Cl R R "* 

CMP R4SI 0T(SP),*2 

BEG 4t 

COM R2 

: Cl R R3 

CLR RO 

CMP R4SL0T(SP),0 2 

BNE hi 

COM RO 

: JSR PC, SWAPO 

START OF DATA PATTERN LOOP. 



jPASS OPERATION TYPE INOICATOR AROUND SWAPO. 
jGET ALTERNATE GPR SET IN Rl THRU R5. 
{SAVE THE INITIAL ERROR NUMBER, 

iSET UP OP TYPE FOP CLEARING OR SETTING. 

j SET UP CLEAR WRITE PATTERN. 

j TEST FOR CLEAR THEN MOV TEST SEQUENCE, 

{CLEAR THEN MOV? YES, LEAVE WRITE PAT CLEAR. 

iNO, SET ALL BITS Of" WRITE PATTERN. 

{INDICATE THAT WORD ACCESSES SHOULD BE USED. 

1 SET ALTERNATE BYTE EXPECTED DATA PAT TO ClEAR 

{TEST FOR SET THEN MOV TEST SEQUENCE. 

I SET THEN MOV? YES. LEAVE ALT By TE PAT Cl E AR , 

{NO, SET AIT ByTE EXPECTED DATA PAT TO Ail IS 

{RESTORE SWAPPED GPR VALUES TO Rl THRU R5. 



CZDHUHO OHU-ll KiNC TST PARTI 
GLOBAL SUBROUTINE 



3112 

5115 021176 

3114 

3115 

5116 

311? 

3118 021176 

311* 021202 

3120 021206 

3121 021212 



MACRO M1200 
- REGTST - 

i • 
8${ 



15-MAR-84 09tl5 



E7 

PAGE 65-1 



^EQ 82 



3123 

3124 

312S 

3126 

312 7 

3128 

312* 

3130 

3131 

3132 

3133 

3134 

3135 

3136 

3137 

3138 

3139 

3140 

3141 

3142 

3145 

3144 

3145 

3146 

3147 

3148 

3149 

3150 

3151 

3152 

3155 

3154 

3155 

3156 

315/ 

3158 

3159 

3160 

3161 

3162 

3163 

3164 

3165 

3166 

316/ 



021216 
021222 



004 76 7 
004 76 7 
010167 
004 767 



00576/ 
001035 



001220 
002136 
162556 
177406 



021224 004767 001172 



021250 
021234 
021240 



021244 
021250 

021252 
021254 



021256 
021260 
021262 
021264 
021270 



021274 
021500 

021302 
021304 



021506 
021512 
021314 



004767 002110 
005267 162530 
004767 177360 



005767 
001022 

005703 
001414 



010201 
010002 
005403 
005267 
004 767 



161034 



162500 
177330 



005767 161004 
001006 

005405 
010102 



004 76 7 
005505 
005330 



000156 



SET OR CLEAR ALL THE USED BITS OF THE DEVICE REGISTERS TOR ALL LINES. 
VERIFY THAT ALL THE BITS WERE SET OR CLEARED CORRECTLY. 

»GET ALTERNATE GPRS FOR SETTING INTIAL STATES 
i GO CLEAR ALL USED REGISU'rt BITS, ALL LINES. 
{SET UP ERROR NUMBER TO INITIAL ERRNBR. 
{VERIFY ALL USED REGISTER BITS, ALL LINES. 

[EXIT THIS ROUTINE IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING 
{HAS BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 

TST EXOERR jHAS AN ERROR BEEN FOUND ? 

BNE 60$ jEXIT THIS ROUTINE IF IT HAS. 



JSR 


PC.SWAPO 


JSR 


PC.WOPOR 


MOV 


Rl, ERRNBR 


JSR 


PC.RDPDR 



JSR 



PC.SWAPO 



, RESTORE rlAIN GPRS CONTENTS. 



} WRITE DATA PATTERNS, ALL LOWER BYTE USED BITS, ALL REGISTERS, ALL LINES 
i VERIFY THAT THE DATA PATTERN WAS WRITTEN CORRECTLY, 



JSR 

INC 
JSR 



PC.WDPOR 

ERRNBR 

PC,RDPDR 



{WRITE DATA PATTERN TO DEVICE REGISTERS. 

{SET ERROR NUMBER TO INITIAL -1. 

{VERIFY DATA PATTERN IN ALTERRED BrTECS). 



i • 



{EXIT THIS ROUTINE IF AN ERROR HAS BEEN FOUND ANO EXTENDED ERROR REPORTING 
{HAS BEEN REQUESTED, 



TST 
BNE 

TST 
BEQ 



EXOERR 
60$ 

R3 
10$ 



j HAS AN ERROR BEEN FOUND ? 
j EX IT THTS ROUTINE IF IT HAS. 

;CHECK THE BYTE INDICATOR. 

{WORD ACCESS? YES, SKIP SECOND BYTE CHECK. 



1 CHECK THAT THF ALTERNATE (UNMODIFIED") BYTE IS CLEAR OR SET AS EXPECTED. 

MOV R2.R1 {SAVE THE DATA PATTERN. 

MOV R0.R2 {GET THF ALTERNATE BYTE EXPECTED DATA. 

NEG R3 jINv n ICAlE THAT O-'HER BYTE IS TO BE CHECKED. 

INC ERRNBR :SET ERROR NUMBER TO INITIAL*?. 

JSR PC.RDPDR jVERIFf DATA PATS IN OTHER BYTES OF REGISTERS 

IexIT THIS ROUTINE IF AN ERROR HAS BEEN FOUND ANO EXTENDED ERROR REPORTING 
;HAS BEEN REQUESTED. 

TST frxOERR {HAS AN ERROR BEEN FOUND ? 

BNE 60$ {EXIT THIS ROUTINE IF IT HAS. 



NEG 
MOV 



R5 
R1.R2 



{RESTORE BrTE INDICATOR, 
{RESTORE DATA PATTERN. 



PEPARt. THE NEXT DATA PATTERN AND LOOP IF NOT DONE. 



10$ 



t * 



JSR 

DF.C 
BGT 



PC, ROLOAP 
R5 

a* 



{ROTATE DATA PATTERN LEFT, N0 T THROUGH CARRl . 
{COUNT THIS ITERATION Of THE LQgP, 
{ALL PATTERNS DONE? NO. LOOP. 



F7 
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GLOBAl SlBROUtlNE - Rf.GTST 

j YES, RESTORE ERROR NUMBER AND EXIT. 
161126 162444 60$! MOV GPRSOB.ERRNBR jGET THE ERROR NUMBR FROM GPR SWAP STORAGE, 

PASS i RESTORE GPRS, 

JSR PC,a(SP>* {RETURN TO F <EG05 SUBRT. 

RTS PC 



5169 






5170 


021516 


016767 


3171 


021324 






021324 


004 7 36 


5172 


021326 


00020 7 



CZDHUBO DHU-U >UNC TST PARTI 
GLOBAL. SUBROUTINE 



3174 
3W5 
3176 
3177 
31 78 
3179 

3180 
3181 
3180 

318? 
318*1 
3185 
3186 
318? 
3188 
3189 
3190 
3191 
319? 
3193 
3194 
3195 
3196 
3197 
3198 
3199 
3000 



MACRO M1000 
- REPSMR 



15-MAR-84 09*15 



G/ 

PAGE 66 



SEQ 84 



soei 

3000 
3003 
3204 
3005 
3006 
300 V 
3008 
3009 
3010 
3011 

3010 
3013 

3014 



001330 
001330 
001334 
001340 



004567 
005 76/ 
001404 



160440 

161100 



001340 010767 016700 160404 



001350 
001350 

001350 
001350 
001354 



i.04460 



004 7 36 
000007 



.SBTTL GLOBAL SUBROUTINE - REPSMR - 

; + + ***** + ** + + *♦*******• + + ********** + *** + *+• + *+* + **** + * + **** + ** + * + + *** + + ******* 

♦ - REPORT ERROR SUMMARY ROUTINE - 

♦ THIS SUBROUTINE REPORTS AN ERROR SUMMARY FOR THOSE LINES WHICH HAVE 

♦ EXCEEDED THE NUMBER OF INDIVIDUAL ERRORS TO REPORT FOR A SINGLE LINE 

♦ IN A SINGLE TEST, THIS PARAMETER CAN BE SPECIFIED BY THE OPERATOR IF 

♦ HE/SHE ANSWERS THE SOFTWARE PARAMETER QUESTIONS. 

ERCNTB - LABEL AT BASE OF LINE ERROR COUNTERS TABLE. 

ERRMSG - ADDRESS OF PRIMARY ERROR MESSAGE. 

ERRNBR - ERROR NUMBER OF ERRORS IN THIS ROUTINE. 

ERSMRF - "REPORT ERROR SUMMARY FOR LINE" FLAGS. 



* INPUTS: 

* 

j* OUTPUTS: 

J* 

;* 

j* CALLING SEQUfcNC 



ERRBLK - ADDRESS OF ERROR REPORTING ROUTINE (DESTROYED). 
SUMMARY MESSAGES MAY BE PRINTED AT THE OPERATOR CONSOLE. 



JSR 



PC, REPSMR 



t* COMMENTS: IF NO LINES HAVE EXCEEDED THE MAXIMUM NUMBER OF INDIVIDUAL 

.* ERRORS TO REPORT, NO MESSAGES ARE PRINTED BY THIS ROUTINE. 

{ * ERROR SUMMARIES IN THIS ROUTINE ARE REPORTED AS ERRORS. 

{♦ THE CONTENTS OF ERRBLK ARE DESTROYED. 

i* 

;♦ SUBORDINATE ROUTINES CALLED: 

... *♦♦*♦*♦*♦*********************♦♦*********♦**♦*♦*****♦♦♦*♦**♦*************** 



REPSMR:: SAVE 

TST 

BEQ 



ERSMRF 

60$ 



j SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5,PREG05 {CALL REGISTER SAVE SUBRT. 

i CHECK THE "PRINT LINE ERROR V.HMARY" FLAGS. 
(EXIT WITHOUT ACTION IF NO SUMMARY FLAGS SET. 



WE HAVE SOME ERROR SUMMARIES TO REPORT. 



i - 



MOV 



0ER9004, ERRBLK {SELECT ERROR REPORTING ROUTINE. 



REPORT 

"ERROR SUMMARY REPORT FOR LINES WITH EXCESSIVE NUMBERS OF ERRORS:" 



60$ 



ERROR 

PASS 

RTS 



PC 



JSR 



iRESTORt GPRS. 

pc,atsp>» 



TRAP CSERROR 
•RETURN TO PREG05 SUBRT 



1-1/ 



C/DHUBO DHU-11 FUNC tst 
GLOBAL. SUBROUTINE 


PARTI 


.Vlfc 








5 4 nr 








321$ 








yw 








3220 








3221 








3222 








322? 








3224 








3225 








3226 








3227 








3228 








3229 








3250 








32? 1 








32?2 








323? 








3234 








32 55 








3236 








3237 








3238 








3239 








3240 








3241 


021356 








021356 


004567 


162414 


324? 


021362 


012702 


000040 


324 3 








3244 








3245 








3246 








324 7 








3248 


021366 


016704 


160650 


3249 


021372 


030214 




3250 


021374 


001406 




3251 


021376 


005003 




3252 


021400 


012/01 


011610 


3253 


0214C4 


004 76 7 


176554 


3254 


021410 


103012 




3255 








3256 








3257 








3258 








3259 








3260 








3261 


021412 


0102/7 


160624 


3262 


021416 


004767 


000722 


3263 








3264 








3265 








3266 








326 / 








3268 


021422 


005003 




3269 


021424 


C 12701 


0116U> 


32/0 


021430 


004 f e, / 


176530 


32 U 


021434 


103410 





MACR 
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W 
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.5BTIL GLOBAL SUBROUTINE - RESET! - 

.+ + i,*4 l 4 l + 4*+ + * + #« + ******t + * + ******* + + # + A*** + 4 l * + + ** + #* + + + + * + + *** + + + * + *. * + + * + * + * + + * 

t + - RESET DEVICE UNDER TEST - 

j* THIS SUBROUTINE IS USED TO RESET THE DUT TO A KNOWN STATE. 

;♦ IF RESET DOES NOT SUCCESFULLY COMPLETE, IE. TIME-OUT OCCURS, THEN 

j* AN ABORT TEST ERROR MESSAGE IS REPORTED. 

i* 

CSRA - CONTAINS THE ADDRESS OF THE CSR 



SEO 85 



TXBFCA 
ERRTBL- 

THE DUT 
CARRY - 
ERRBLK 

IESTAT 
TX AND 



■ CONTAINS ADDRESS OF DUT DMA BUFFER COUNT REGISTER. 
ERRTYP.EPNBR.PND ERRMSG SET UP CORRECTLY. 



* INPUTS: 

* 
* 

* OUTPUTS? 

* 
+ 
* 

+ 
* 

, * 
**4 + + ***********.*******A*****A** + ********! ■♦** + * + + ** + *** + + + * + *** + ** + + * + * + ♦+ + +■* + 



PERFORMS ITS RESET FUNCTION INTO A KNOWN STATE. 
CLEAR INDICATES THE TEST IS TO BE ABORTED. 

- VALUE MAY BE DESTROYED, 

- TX AND RX INTERRUPT FLAGS ARE 
RX INTERRUPT ENABLE BITS IN THE 



CLEARED. 
DUT'S CSR 



ARE CLEARED. 



CALLING SEQUENCE: 

COMMENTS: THIS 

THIS 



JSR 



PC.RFSETT 



SUBROUTINE CAN REPORT ERRORS 
ROUTINE DOES NOT DESTROY THE 



WITH 
VALUE 



NUMBERS INITIAL ERRNBR 
OF ERRNBR. 



SUBORDINATE ROUTINES CALLED: DELAY .MSLGET 



RESETT:? SAVE 

MOV 

J 



JSR 
0BIT05.R2 



j SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 ;CALL REGISTER SAVE 

j SET BIT MASK OF MASTER RESET BIT, 



SU6RT 



TEST THE STATE OF THE MASTER RESET BIT IN THE CSR, 
IF MR IS StT THf.N WAIT FOR SELF-TEST TO COMPLETE. 
IF TIME OUT OCCURS, REPORT THE ERROR AND PASS-OUT ABORT TEST INDICATOR 

|GET THE ADDRESS OF THE. DUT'S CSR. 

; CHECK STATE OF MASTER RESET BIT. 

I DON' T DELAi IK MP IS ALREADY CLEAR. 

;SF.T UP DESIRED S1ATE OF MASTER RESET BIT. 

j PASS TIME-OUT VALUE OF 5 SECONDS, 

I WAIT FOR SELF TEST TO COMPLETE, MR CLEAR, 

I GO REPORT ERROR IF TIMEOUT OCCURRED. 

j*SET MASTER RESET BIT IN CSR, CLEAR TX AND RX ENABLE BITS, ETC* 
SKIP THE SE.Lf- TEST. 
TIME-OUT OF S SECS, JUST IN CASE THE SEl F ■ TEST EXECUTFS. 



MOV 


CSRA.R4 


BIT 


R2.CR4) 


BKU 


2* 


CLR 


R3 


MQV 


05000. ,R1 


JSR 


PC, HSLGET 


BCC 


4* 



Zt'. 



MOV 
JSR 



R2,o)CSHA 
PC.SKPSTS 



jSET MASTER RESET RU, DISABLE TX AND RX 1NTS. 
jTRf JO SKIP THE SEl F TEST. 



SET SELF TEST TIME OUT Of 5 SECONDS, AND WAIT FOR M.R TO CLEAR. 

If T IMt OUT OCCURS, THEN REPORT THE FATAL ERROR ANO PASS OUT THE ABORT 

TEST INDICATOR. 



CLR 
MOV 
JSR 
BCS 



R3 

^5000. ,R1 
PC »MSLGET 
6* 



I St r \V OESIRED STATE OF MASTER RESET fill, 
{PASS TIME OUT VALUE UF 5 SECONDS, 
{WAIT KIR st.L f TEST TO COMPUTE, MR CtE\R, 
{SKIP ERROR REPORT IF MR CLEARED IN TIME. 



CZDHUBO DHU 11 f UNC 
GLQBAl SUBROUTINE 



TST PARTI MACRO M120O 15-MAR-84 09; 15 



icrq mi 

Rt.Sfc.TT 



I / 
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r >EQ 86 



52/2 

32/3 

32 '4 

3c? 75 

3276 0214*6 

327/ 021442 

32 T 8 

32 7'1 

3280 0214;>0 
021450 

3281 021452 

3282 021454 
3285 

3284 

3285 
*?«6 

328 7 021456 
3288 021462 
3289 

3290 021464 
021464 
3291 
3292 
3293 



021466 



012701 
012767 



104460 
000241 
000403 



005067 
000261 



004 736 
000207 



012221 
016526 



160626 



SET UP ERROR MESSAGE TO REPORT "FATAL ERROR POUND DURING RESET, TEST ABORTED", 
INDICATE TEST IS TO BE ABORTED BY CLEARING THE. CARRY BIT. 

4$: MOV 0F.M1601.R1 jPASS ERROR MESSAGE TO REPORT, 
162324 MOV /»ER1603 , ERRBLK {PASS ADDRESS OF ERROR HANDLING ROUTINE. 

{REPORT ERROR "TIME-OUT OCCURRED WAITING FOR MASTER RESET TO CLEAR" 

{ "TEST ABORTED" 

ERROR i >>>>> ERROR <<<<< 

TRAP CSERROR 
CLC {INDICATE TEST IS TO BE ABORTED. 

BR 60* {EXIT THIS SUBROUTINE, ABORT TEST INDICATOR. 

CLEAR IX AND RX INTERRUPT ENABLE STATUS FLAGS IN IESTAT. 
EXIT WITH CONTINUE TEST INDICATOR SET CIE,CARRf SET). 



b* : 


Cl.R 

SEC 


60$: 


PASS 




RTS 



IESTAT 



JSR 



PC 



{CLEAR TX AND RX INTERRUPT STATUS FLAGS. 
{INDICATE SUCCESS, CONTINUE. TEST. 

{RESTORE GPRS, PASS THE FOLLOWING INTAC V : 
PC.aCSP)* {RETURN TO PREG05 SUBRT 

{CARRY BIT; IP CLEAR , INDICATES ABORT TEST, 



C/DHU10 DMJ, 11 > L'NC 

bl.OBAi SUBROUTINE 



32 l >5 

32^*6 
32 k >7 

32^'» 
5300 
3301 

3302 

3 a ;o3 

3304 
3 J OS 
330b 
330 7 
3308 
3309 
33^0 
3311 
^l? 
3313 
3314 

3315 

3316 
331/ 
3318 
3319 



3320 

5321 



0214/0 

021470 
0214 74 

0214 76 
02150C 
021502 
021504 
02 1 504 
021510 



00456/ 
005702 

100001 

000261 
006102 

010266 

004 736 



J/ 



TST PARTI 
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'-.EU 8 7 



162302 



000006 



.SBTTL GLOBAL SUBROUTINE - ROLOAP - 

;****************************«****** + * + ************#* + + *** + * + **#****i*|.*-¥* + *** + ^ 

I* - ROTATE LEFT DATA PATTERN 

♦ THIS ROUTINE ROTATES THE PASSED INPUT DATA PATTERN LEE T .WITHOUT GOING 

♦ THROUGH THE CARRY . THE CARRY 15 INITIALI r SET OR CLEARED DEPENDING 

♦ UPON THE STATE OF THE MSB Of THE DATA PATTERN ^EFQk: A ROL INSTRUCTION 

♦ IS EXECUTED. 

♦ INPUTS: 

♦ OUTPUTS: 



R2 
R2 



CONTAINS THF DATA PATTERN TO BE ROTATED 
CONTAINS THF ROTATED DATA PATTERN 
1* CALLING SEQUENCE: JSR PC.ROLDAP 



* COMMENTS; 

* SUBORDINATE ROUTINES CALLED: NONE 



ROLOAP: :SAVE 





TST 


R2 




BPL 


2$ 




SEC 




2*: 


RDl 


R2 


60$: 


PASS 


R2 



021512 000207 



RTS 



PC 



jSAVE CONTENTS OF GPRS RO THRU R5 . 
JSR R5.PREG05 ;CALL REGISTER SAVE SUBRT , 
iCHF.CK MSB, ANO CLEAR CARRi, 
jBRANCH IF CLEAR. 
SET CARRY IF - MSB SET 
ROTATE D/MA PATTERN LEF t 
RESTORE GPRS. EXCEPT 
MOV R:\R25l OT(SP) iPuT R2 IN STACK SLOT. 

JSR PC.aCSP^ ; RE TURN TC PREG05 SUBRT 

}R2 - CONTAINS THE ROTATED DATA PATTERN 



CZDHUfiO DHU-U KINC TST PARTI 
GLOBAL SUBROUTINE 



3503 
3304 
3305 
33 >6 
330 * 
3308 
3309 
3330 
3331 
3330 
3333 
3334 
3355 
3336 
333 * 
3538 

333 ^ 
3340 

334 1 
354? 
3343 
3344 
3345 
3346 
334 7 
3348 
3349 

3350 

3?/;.; 

3350 



MACRO M1000 
• RSTRPT 



15 MAR 84 09 : 15 



PAGt 69 



SEQ 88 



3353 
3354 

3 555 
3556 

335.' 
3 558 
3559 

3360 
3361 
3560 

336 3 
3364 
3365 
3366 
336/ 
3568 
3369 
3570 
3* 7 1 

33/0 
^ 5 / 5 

35/4 

3 5 75 
35/6 

337 7 



001514 

001514 



001500 
001500 
001506 
001530 



001534 
001540 

001544 



001550 
001550 



00 1 554 
00156.' 

oari.64 



004567 160056 



005003 
016/05 
017700 
100400 



010567 
010701 
010767 



104460 



030 76/ 
001003 
010767 



160040 
160510 



160050 
015107 
017036 



.SBT1L GLOBAL SUBROUTINE - RSTRPT - 

- REPORT ANY RESET ERRORS ROUTINE 
THIS ROUTINE DETERMINES IF ANY ERROR CODES ARE AMONG THE DIAGNOSTIC 
CODES REPORTED PLACED IN THE OUT RECEIVED CHARACTER FIFO BY THE 
SELF-TEST. IF ANY NON BMP ERROR CODES ARE FOUND, OR IF OTHER ERRORS 
ARE ENCOUNTERED, APPROPRIATE ERRORS ARE REPORTED. ANt BMP CODES THAT 
ARE FOUND, ARE PLACED ON THE BMP CODE QUEUE TO BE REPORT!: J LATER. 
THIS ROUTINE ALSO PURGES THE OUT FIFO LOOKING FOR ANY CHARACTERS 
OR MODEM STATUS CODES. IF ANY ARE FOUND. ERRORS ARE REPORTED. 

INPUTS: ERRMSG - ADDRESS OF THE PRIMARY ERROR MESSAGE. 

ERRNBR - ERROR NUMBER OF FIRST ERROH REPORTED Br THIS ROUITNE. 
NUMLNS - EQUA1ED TO THE NUMBER OF LINE ON THE OUT. 
RBUFA - CONTAINS ADDRESS OF THE DUT RECEIVER FIFO. 

OUTPUTS: CARRY - SUCCE . ' FLAG (SET IF FIFO CLEARED SUCCESSFULLY). 
ERRBLK - ADDR.i: OF THE ERROR REPORT ROUTINE (DESTROYED). 
ERROR MESSAGES LAN BE PRINTED AT THE OPERATORS CONSOLE. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC, RSTRPT 



THIS SUBROUTINE CAN REPORT ERRORS WITH NUMBERS INITIAL ERRNBR 

THRU INITIAL ERRNBR*4. 

THIS ROUTINE DOES NOT DESTROY THE VALUE. OF ERRNBR. 

SUBORDINATE ROUTINES CALLED: ERO503 .ER9O07 .ER9008.SAVBMP , 
** + ♦♦**♦♦♦♦*** + + + #.*** + *♦**** + ***** + ♦**#*♦*#***#*********** + *** + ** + + ***** + **> 



RSTRPT:: SAVE 

I » 



;SAVE CONTENTS uF GPRS RO THRU R5. 
JSR R5.PREG05 jCALl REGISTER SAVE SU6RT. 



READ CORRECT NUMBER (NUMBER OF LINE ON DUT) OF CHARS FROM THE FIFO. 
VERIFY THAT EACH CHAR IS A SELFTEST SUCCESS CODE. 



0$ 



CLR 
MOV 
MOV 
BMI 



R3 

ERRNGR.R5 
3RBUFA.R0 
4* 



{CLEAR THE CODE COUNTER. 

{SAVE ERRNBR FOR RESTORATION LATER. 

{READ A CHAR FROM THE OUT FlfQ. 

{SKIP ERROR IF DATA. VALID SET FOR CHAR. 



WE EXPECT A SELFTEST CODE, PUT THIS FIFO SLOT IS EMPH . 



160000 



MOV H5, ERRNBR 

MOV 0EM9018.R1 

MOV 3ER9007, ERRBLK 



{RESTORE ERROR NUMBER TO INTITIAi VAl UE . 
jPASS ERROR MESSAGE INFO JO ER900 7 ROUTINE. 
{SELECT PROPER ERROR REPORT ROUTINE. 



REPORT ERROR WITH NUMBER INITIAL ERRNRB. 

NO SELFTEST CODE IN SELFTEST CODE FIFO SI 01 FOR t INE NN AFTER RESET. 



ERROR 



^ % •» n ^ 



ERROR 



< < v.' V V , 

TRAP 



C TERROR 
EXIT THIS ROUTTNE IF EXTENDED ERROR REPORTING HAS NOT BEEN REUUIS'EO. 



000100 
000001 



It. 04 40 



160510 



I - 



BIT $BITO6,0PUQN 

BN* 3$ 

MOV tfl.EXOERR 



{HAS EXTENDED ERROR REPORTING BEEN REQUESTED 
j/WOU") SET THE EL AG IF IT HAS* 
{SET THE EXIT ON ERROR FLAG 



L. / 



CZDHUfiO DHU-11 U.JNC 
GLOBAL. SUBROUTINE 



33 /a 

33/9 
3580 

3381 
3 38 J? 
3583 
3384 
3385 
3386 
3387 
3388 
3389 
3390 
3391 
359? 
3393 
3394 



1ST PARTI 



339b 
3396 
3397 
3398 
3399 
3400 
3401 
34 C? 
3403 
3404 
3405 
3406 
3407 
34 OS 
3409 

3410 
34U 
341,? 
3415 

3414 
3415 

3416 

3417 
3418 
3419 
3420 
3421 
342? 
3425 
3424 
34 t >'.> 
342* 
342 7 

3428 
3420 
34:50 
34 51 
34 52 
34 33 



0215 72 
021574 



021600 
021604 
02160b 



021610 

02161.4 
021616 
021622 
021624 
021630 
021632 
021636 
021640 
021642 
021646 



021650 
021654 
021660 

021664 



021672 
021672 



0216 74 
021702 

021704 
021712 



021/14 
021720 
021 726 

021732 



000261 
000167 



012700 
040200 
001042 



032702 
001462 
120227 
00145/ 
120227 
001454 
012700 
040200 
001005 
004 767 
000445 



010567 
00526 / 
012/01 
012767 



104460 



05276/ 
001027 

012/6/ 
000534 



0105t> 7 
062/6 7 
012/01 
0X2767 



000406 



07Q001 



000200 
000203 
000P01 
000300 

0004 30 



162114 
162110 
015154 
017126 



162050 
00000? 
01515/ 
017036 
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INIDICATE "SUCCESS" (BECAUSE FIFO IS PURGED), AND EXIT THIS ROUTINE. 



^EQ 89 



SEC 
JMP 



60$ 



t SET SUCCESS FLAG, 
;EXIT ROUTINE, 



4$ 



DETERMINE IF THIS IS NOT A SELFTEST CODE. 



MOV 
BIC 
BNE 



470001, RO 

R2.R0 

8$ 



{GENERATE BIT MAP OF AN^r CLEAR ERROR BITS OR 

; BIT WHICH ARE CLEAR. 

{GO TO REPORT ERROR IF THIS IS NOT A TEST CODE. 



6$ 



162102 



WF HAVE A TEST CODE (EITHER BMP OR SELFTEST CODE), 
DETERMINE WHAT TYPE OF CODE WE HAVE. 

TEST ROM VERSION CODE INDICATOR HIT. 

SKIP ERRORS IF SELFTEST ROM VERSION CODE. 

CHECK IF SKIP SELF TEST CODE, 

SKIP ERROR REPORT IF SKIP SELF TEST CODE FOUND 

CHECK IF NULL CODE PRESENT. 

SKIP ERROR REPORT IF SELF TEST NULL CODE. 

TEST CODE TYPE BITS FOR GOTH CODfc 

rrPE BITS SET (INDICATING BMP CODE). 
IF IT IS NOT A BMP CODE GO REPORT ERROR. 
SAVE THE BMP CODE ON THE QUEUE. 
GO GET THE NEXT CHARACTER FROM THE FIFO. 

! WE HAVE. A SELFTEST ERROR CODE. 

MOV R5.ERRNBR jRESTORv ERROR NUMBER TO INTITIAL VALUE . 

INC FRRNBR {CALCULATE INITIAL ERROR NUMBER PLUS 1. 

MOV OEM9020.R1 {PASS ERROR MESSAGE INFO TO ER9008 ROUTINE. 

MOV OER9008.ERRRLK {SELECT PROPER ERROR REPORT ROUTINE. 

REPORT ERROR WITH NUMBER INITIAL ERRNRB * 1. 

"UNEXPECTED SELFTEST ERROR CODE FOR LINE NN IN * IFO AFTER RESET:" 



BIT 


OflIT7,R2 


BEQ 


10$ 


CMPB 


R2.02O3 


BEQ 


10$ 


CMPB 


R2.0201 


BEQ 


10$ 


MOV 


4300, RO 


BIC 


R2.R0 


BNE. 


6$ 


JSR 


PC.SAVBMP 


BR 


1.0$ 



ERROR 



>>•>>> ERROR < <<<< . 

TRAP 



C$ERROR 
EXIT THIS ROUTINE IF EXTENDED ERROR REPORTING HAS NOT BEEN REQUESTED, 



000100 16052? 



000001 160372 



l 



BET OBI r06, OPTION 

BNE 10$ 

MOV <M,EX0ERR 

BR 50$ 



{HAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
AVOID SET THE FLAG IF IT HAS AND GO TO 
THE END OF THE LOOP. 
SET THE "EXIT ON ERROR" FLAG 

EXIT THE ROUTINE WITH FA.LlURE SINCE THE FlVQ 
IS NOT PRUGF.D. 



WE HAVE A NONSEIFTEST CODE (EITHER BMP CODE OR DATA CHAR), 



8$ 



162042' 
162034 



MOV R5.ERRNBR 

ADD tf?,ERRNHR 

MOV 0EM9019.R1 

MOV 0ER9OO/.ERRBLK 



{RESTORE ERROR NUMBER TO INTITIAL. VAi.i.'F . 
iCAl CU.ATE INLTIAl ERROR NUMBER PLUS ?. 
{PASS \ RROR MESSAGE J.NM) TO ER9007 ROUTINE. 
{SELECT PROPER ERROR REPORT ROUTINE. 



j REPORT ERROR WITH NUMBER INITIAL ERRNRB 



CZDHUflO DHU11 H>NC TST PARTl 
GLOBAL SUBROUTINE 



3434 
34 35 
34 36 

34 37 

3438 

34 39 

3440 

3441 

3442 

3443 

34<4 

3445 

3446 

3447 

3448 

3449 

3450 

3451 

345? 

3453 

3454 

3455 

3*456 

345/ 

3458 

3459 

3460 

3461 

3462 

3463 

3464 

3465 

3466 

346 7 

3468 

3469 

34/0 

34 71 

34/2 

34/3 

34 74 

34/5 

34 76 

34 7 7 

^4/8 

34 /<> 

3480 

3481 

3482 

348 5 

3484 

3485 

3486 

348/ 

34Htf 

3489 



021740 
021740 



021742 
021750 

021752 
021760 



021762 

021764 
021770 



0217?? 

0217 76 
022002 
022C10 
022016 
022022 
022024 



022026 
02203? 
022034 



022036 
022042 



022044 
022050 



022052 
022056 



104^60 



032767 
001004 

012767 

000511 



005203 
02032/ 
002656 



012704 
010567 
062/6/ 
012767 
017 70? 
000261 
100070 



012 700 
040200 
001403 



012/01 
000423 



032/0? 
001003 



000100 
000001 



000010 



r.v: 

161766 
000003 
017126 
160222 



070000 



015200 



000001 



012/01 015217 
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160254 
160324 



"NON- SELF' TEST CODE IN SEL.FTEST CODE FIFO SLOT FOR LINE NN AFTER RESET." 

ERROR I >>>>> ERROR <<<<<. 

TRAP C$ERROR 

EXIT THIS ROUTINE IF EXTENDED ERROR REPORTING HAS NOT 3EEN REQUESTED. 



BIT V>BTT06,0PTI0N 

BNE 10& 

MOV 01.EXOERR 

BR 50$ 



{HAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 

{AVOID SET THE FLAG IF IT HAS AND GO TO 

j THE END OF THE LOOP. 

iSET THE "EXIT ON ERROR" FLAG 

.-EXIT THE ROUTINE WITH FAILURE. 



10$ 



END OF LOOP, LOOP IF NOT ALL CHARS HAVE BEEN READ FROM THE FIFO. 



INC 
CMP 
BLT 



R3 

R3,tf8. 
2$ 



{SET CODE COUNTER FOR NEXT ITERATION OF LOOP. 

j TEST FOR ALL CODES READ. 

;L0OP IF NOT CHARS READ FROM FIFO. 



PURGE THE FIFO UNTIL DATA. VALID IS CLEAR OR UNTIL TOO MANY CHARS ARE READ. 



161760 
161756 



12$ 



MOV 
MOV 
ADD 
MOV 
MOV 
SEC 
BPL 



#18. ,R4 

R5.ERRNBR 

03.ERRNBR 

0ER9008.ERRBLK 

SRBUFA.R2 

60$ 



5 INITIALIZE THE CHARACTER COUNTER. 

{GET INITIAL VALUE OF THE ERROR NUMBER. 

{CALCULATE ERROR NUMBER OF NEXT ERROR. 

{SELECT PROPER ERROR REPORT ROUTINE. 

{READ A CHARACTER FROM THE OUT FIFO. 

{INDICATE SUCCESS IN CASE DATA. VALID IS CLEAR. 

{EXIT ROUTINE WITH SUCCESS IF DA\A, VALID CLEAR. 



WE HAVE A CHARACTER. 

DETERMINE IF CHAPACTER IS A DATA CHARACTER. 



MOV 
BIC 
BEQ 



4/00O0.R0 

R2.R0 

14$ 



TEST BITS 12 THRU \A OF THE 

CODE READ FROM THE OUT FIFO. 
SKIP THIS ERHOR IF CODE IS NOT A DATA CHAR. 



j WE HAVE AN UNEXPECTED DATA CHARACTER: SET UP AND GO TO REPORT ERROR. 

MOV OEM9022.R1 {SELECT ERROR MSG INFO FOR ER0808 ROUTINE. 

BR 22$ {GO TO REPORT THIS F.RRUR . 

WE HAVE AN UNEXPECTED CODE. 

DETERMINE IF THE CODE IS A MODEM STATUS CODE. 



14$ 



BIT 

bne 



flBIT0,R2 

16$ 



{TEST MODEM STATUS INDICATOR BIT OF CODE, 
jSKIP THIS ERROR IK NOT MODEM STATUS CODE. 



{ WE HAVE A MODEM STATUS CODE; SET UP AND GO TO REPORT ERROR, 



MOV 0EM9023.R1 

BR 22$ 



{SELECT ERROR MSG INFO FOR ER0808 ROUTINE, 
{GO TO REPORT THIS ERROR. 



WE HAVE AN ONBOARD TEST CODE. 
DETFRMINE IF" THIS CODE IS A BMP CODE. 



SEQ 90 



022060 032/02 000200 



16$ 



BIT 



OBIT7.H2 



;TEST 1HE ROM VERSION BIT OF THE CODE. 



CZDHURO DHU-11 f'UNC TST PARTI 
GLOBAL SUBROUTINE 



3490 
3491 
3492 
3493 
3494 
3495 
3496 
349/ 
3493 
3499 
3500 
3501 
3502 
3503 
3504 
3505 
3506 
3507 
3508 

3509 

3510 
3511 
351? 
3513 
3514 
3515 
3516 
3517 
3518 
3519 
3520 
3521 
3522 
3523 
3524 
3525 
3526 
3527 
3528 
3529 
3530 
3531 
3532 
3533 
3534 

3535 

3536 
353/ 
3538 
3539 
3540 
3541 
3542 
354 3 
3544 



022064 
022066 
022072 
022074 



0220/6 
022102 



022104 
022110 



022112 
022112 



022114 
02212.2 

022124 
022132 



022134 
022136 



022140 
022144 
022150 
022156 



00)404 
012700 
040200 
001403 



01c' /Oi 
000403 



004 76 / 
000411 



104460 



032767 
001004 

012767 
000424 



005304 
001327 



012701 

010567 
C62767 
012767 



022164 104460 



022166 
022174 
022176 

022204 

022206 



032767 
001003 
012767 

000241 



000300 



015241 



000166 



000100 
000001 



015016 
161620 
000004 
016136 



000100 
000001 
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160102 
160152 



161612 
161610 



160030 
160100 



BEQ 
MOV 
BIC 

BEQ 



18$ 

4300.R0 
R2.R0 
20$ 



jGOTO SET UP FOR SELFTEST CODE IF* ROM VERSION. 

;TEST THE ERROR TYPE BITS OF" THE CODE. 
;SKIP THIS ERROR IF BMP CODE. 



WE HAVE A SELFTEST CODE: SET UP AND GO TO REPORT ERROR. 



18$ 



20$ 



MOV 4EM9024.R1 
BR 22$ 



{SELECT ERROR MSG INFO FOR ER0806 ROUTINE, 
j GO TO REPORT THIS ERROR. 



WE HAVE A BMP CODE; SAVE IT ON THE QUEUE. 



JSR 
BR 



PC.SAVBMP 
24$ 



;SAVE THE BMP CODE ON THE QUEUE. 



REPORT THE ERROR WITH ERROR NUMBER OF INITIAL ERRNBR ♦ 3. 
"UNEXPECTED XXX XXXX FOR LINE NN IN FIFO AFTER RESET: * 



22$ 



l - 



ERROP 



>>>>> ERROR <<<<<. 

TRAP 



C$ERROR 



EXIT THIS ROUTINE IF EXTENDED ERROR REPORTING HAS NOT BEEN REQUESTED. 



BIT 4BIT06, OPTION 

BNE 24$ 

MOV Ol.EXOERR 

BR 50$ 



{HAS EXTENDED ERROR REPORTING SEEN REQUESTED ? 

jAVOID SETTING THE FLAG IF IT HAS AND GO TO 

{THE END OF THE LOOP. 

{SET THE "EXIT ON ERROR" FLAG 

{EXIT THE ROUTINE WITH FAILURE. 



END OF LOOP. 

COUNT THE CHARACTER WE JUST RECEIVED, AND CHECK FOR TOO MANY RECEIVED. 



24$ 



DEC 
BNE 



R4 
12$ 



{COUNT THIS CHARACTER. 

{LOOP IF NOT TOO MANY CHARACTERS PURGED. 



; WE READ TOO MANY VALID CHARACTERS WHIl E TRYING TO PURGE THE FIFO. 
j REPORT ERROR AND EXIT WITHOUT SUCCESS. 

"FIFO WILL NOT PURGE (DATA.VAlID STUCK SET), REMAINDER OF TEST SKIPPED," 



MOV 0EM9017.R1 
MOV R5, ERRNBR 
ADD *4, ERRNBR 
MOV GERC5C3.ERRBLK 

{PRINT ERROR REPORT. 

ERROR 



SELECT PROPER ERROR MESSAGE. 
GET INITIAL ERROR NUMBER. 
CALCULATE INITIAL ERRNBR ♦ 4. 
SELECT PROPER ERROR REPORT ROUTINE. 

>> >>> ERROR <<<<< % 

TRAP 



CS ERROR 
EXIT THIS ROUTINE IF EXTENDED ERROR REPORTING HAS NOT BEEN REQUESTED. 



50$ 
60$ 



BIT 
BNE 
MOV 

Ct C 

PASS 



*/BIT06,0PTI0N 

50$ 

tfl.EXOERR 



{HAS EXTENDED ERROR REPORTING BEEN REQUESTED > 
iMVOID SETTING THE FLAG IF IT HAS. 
;SET THE "EXIT ON ERROR" FLAG 

{CLEAR THE SUCCESS FLAG. 

{RESTORE GPRS, 



SEU 91 



138 



C*0MU10 OKI 11 KiNC TST f'HRU MACRO M1JOO 15 -MAR P4 Q9>15 PACifc 69-4 SEQ 92 

GLUBAi SUBROUTINE - RSTRPT - 

O,'. 1 ,^ 004:56 JSR PC,8('JP)» jRfcTURN TO PRFGCS SUBRT. 

3S45 OcVatO 000^07 RTS PC I CARRY - SUCCESS FLAG (SET IF FIFO IS PURGED). 



CM 



&W°sBBOhU! 



iNC TST PARTI 



XM7 
3548 
354 v * 

3sso 

?SM 
35V 

3554 
3555 
3556 

355 ; 

3556 

3560 
3561 
3562 

356 3 
3564 
3565 
3566 



3567 



3566 
356<* 
3570 



35/t 
3572 



022212 
022214 
022214 
022216 
022220 
022220 
022224 
022226 
022234 
022242 
022242 
022244 
022246 
022250 
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010046 

104440 
010046 

012700 000340 
104441 

04276/ 15777/ 

016777 160050 

012600 
10444 1 
012600 
000207 



160054 
160000 



RXIEO 



RECEIVER INTERRUPT DISABLE 
THIS ROUTINE IS USED TO DISABLE RECEIVER INTERRUPTS IN THE 0HU11. 

NONE . 

THE RX.INT.EN6L BIT IS CLEARED IN THE UUT CSR, 

IESTST CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 

ENABLE BITS. 



* OUTPUTS: 

♦ 

+ 

♦ CALL INT, SEQUENCE: 



JSR 



PC, RXIEO 



THE CONTENTS Of THE INDIRECT ADDRESS REGISTER EIELD IN 
THE UUT CSR ARE DESTROYED. 



♦ COMMENTS! 

♦ 

♦ SUBORDINATE ROUTINES CALLED: NONE. 



RXIEOti MOV RO, (SP) 
GETPR1 i^P) 



SETPRI 0PRI07 



BIC 015/777, IESTAT 

MOV IESTAT.WCSRA 

SETPRI (SP)» 



MOV 
RTS 



(SP)»,RO 
PC 



I SAVE CONTENTS OF' RO ON THE STACK, 

I SAVE PROCESSOR PRIORITY ON STACK. 

TRAP CMjPUI 

MOV RO, -CSfM 

I IGNORE ANY INTERRUPT THAT MAY BE GENERATED. 

MOV CPR10 7.R0 

TRAP CISPRI 

j CLEAR RX.INT.EN8L BIT IN IESTAT. 

(DISABLE RX INTERRUPTS. 

I ENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 

MOV (SP)'.RO 

TRAP CISPRI 

iRESTORt RO. 



SEQ 93 



KBBtf^RHHoAhto^ 



1ST PARTI 



MA 



GBM 
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f ^EQ 94 



35 74 
3575 
35 7e* 

35 7 7 
35 78 
357*'» 
3580 
358 1 
358,? 
358 3 
3584 
3585 
3586 
756 * 
3588 
35«9 

35*0 
3591 
359a 
3593 
3594 
35<* r i 
3596 



022252 
022260 
022266 
022274 



052 76/ 
042767 
016777 
000207 



>*+****+***++«*+**+**++* 



.SB Hi. GLOBAL SUBROUTINE - RXIE1 

♦ ■ RECEIVER INTERRUPT ENABLt 

* THIS ROUTINE 13 USED TO ENABLE RECEIVER INTERRUPTS IN THE 0HU1 1 . 



♦ INPUTS: 

* 

♦ OUTPUTS; 

* 



NONE. 

THE RX.INT.EN8L BIT IS SET IN THE OUT CSR. 

iESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 

ENABLE BITS. 



J5R 



PC.RXIE1 



* CALLING SEQUENCts 

* COMMENTS; THE CONTENTS OF THF INDIRECT ADDRESS REGISTER FIELD IN 

* THE. DUT CSR ARE DESTROYED. 

* SUeORDINAiE ROUTINES CAlLED: NONE. 

- - ##*#*##»*.**^*** ¥ **** #..**,#*.***** #*.**#***.*******»********************''******* 

iSET RX.INT.ENBl BIT IN ItSTAT, 

l CI. FAR ALL OTHER BITS, EXCEPT TX AND RX I.E. 

lENABLb RX INTERRUPTS. 



000100 


160030 


RXIEli: 


BIS 


0B1T06.IFSTAT 


137677 


160022 




BIC 


•137677, IFSTAT 


160016 


157746 




MOV 
RTS 


IFSTAT.QCSRA 
PC 



S(» S P$6&ti$ NC 



TST PARTI MACR 



3598 

3599 

3600 
3601 
3602 
3603 
3604 
3605 
3606 
3607 
3608 
3609 
3610 
3611 
361? 
3613 
3614 
3615 
3616 
361? 
3618 
3619 
3620 
3621 

3622 
3623 
3624 
3625 
3626 
3627 
3628 
3629 
3630 
3631 
3632 

3633 



022276 
022276 
022302 
022306 
022312 
022314 
022320 
022322 
022326 
022330 
022334 

022340 
022340 
022342 



00456/ 
016704 
116724 
005204 
042702 
010224 
020427 
103402 
162 704 
010467 



004 7 36 
000207 



§» 



200 



E8 

15 -MAR -84 09:15 PAGE 72 



SEQ 95 



SBTTL GLOBAL SUBROUTINE - SAVBMP - 

f m + mmm + 4. + *+.m + ±mm + m + mi + m. + + * + *mm + + + *+ + + + * + *** + *++ + ++* + * 

• SAVE BMP CODES ROUTINE - 
THIS ROUTINE SAVES THE PARAMETER PASSED IN, ONTO THE flMP CODE QUEUE 
TOGETHER WITH THE NUMBER OF THE CURRENTLY EXECUTING iF.ST. 



INPUTS: 



OUTPUTS 



R2 - CONTAINS THE BMP CODE THAT IS TO BE PLACED ON THE QUEUE. 
BMPCQP - CONTAINS ADDRESS OF NEXT LOCATION IN THE BMP QUEUE. 
BMPCQB - LABEL AT BASE OF THE BMP CODE QUEUE . 

BMPCQE * LABEL OF NEXT LOCATION AFTER THE END OF THE BMP QUEUE. 
TSTNUM * CONTAINS THE NUMBER OF THE CURRENT TEST. 

BMPCQP - INCREMENTED BY 4. 

THE CONTENTS OF THE BMP CODE QUEUE ARE UPDATED. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC, SAVBMP 



IF THE OVERFLOW OCCURS THEN THE LAST LOCATION WILL BE 
OVERWRITTEN BY ANY SUBSEQUENT ATTEMPTS TO UPDATE THE QUEUE. 

SUBORDINATE ROUTINES CALLED: NONE. 



161474 
160216 
160012 

177400 

002726 

000004 
160164 



SAVBMP:: SAVE 



MOV 
MOVB 
INC 
BIC 
MOV 
CMP 
BLO 

sue 

MOV 



2$: 

60$; 



JSR 
BMPCQP, R4 
TSTNUM,(R4H 
R4 

01 7 7400, R2 
R2,(R4)» 
R4.4BMPCQE 
21 

04, R4 
R4, BMPCQP 



{SAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 jCALL REGISTER SAVE SU6RT. 

jGET THE POINTER TO THE NEXT LOCATION IN QUEUE. 

j SAVE THE CURRENT TEST NUMBER ON THE QUEUE.. 

j INCREMENT THE POINTER TO GIVE AN EVEN ADDRESS, 

t CLEAR THE UNWANTED BITS FROM THE BMP CODE, 

j SAVE THE BMP CODE ON THE QUEUE. 

{CHECK IK OVERFLOW WILL OCCUR THE NEXT TTME . 

I GO SAVE THE POINTER IF WE WILL NOT OVERFLOW. 

{RESET THE POINTER TO THE LAST LOCATION IN QUE. 

j SAVE THE POINTER. 



PAS' 
RTS 



PC 



JSR 



j RE STORE GPRS. 

pc.acsp;)* 



j RE TURN TO PREG05 SUBRT 



CZDHU60 DHU-il KUNC 
GLOBAL SUBROUTINE 



3655 
3636 
36/7 

36*8 
3639 
36 «0 

3641 
364,? 
3643 
3644 
3645 
3646 
364 7 
3648 
3649 
3650 
3651 
3652 
3653 
3654 
3655 



i"ST PARTI 



3656 
3657 
3658 
3S59 
3o60 
3661 
3662 
3663 
3664 
3665 
3666 
3667 
366K 
3669 
3670 
3671 
3672 
3673 
3674 

3675 



022344 
022344 
022350 
022354 



022364 
022o70 
022372 
022376 
022400 
022402 
022406 
022410 
022414 

022416 
022416 
022420 



004567 
012704 
004 767 



012703 
005301 
016704 
010124 
01C324 
020467 
103774 
032701 
001365 



004 736 
000207 



MACRO M1200 
- SKPSTS 

.SB 

i * ♦ 

!* 

}* 
{♦ 

;♦ 
;♦ 

}* 
;* 
i* 

}* 
;* 
j* 
i* 
;♦ 
;♦ 
{* 
t - - 
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SEQ 96 



161426 
000012 
175544 



022360 012701 000060 



052525 
157644 

157652 
000017 



TTL GLOBAL SUBROUTINE - SKPSTS - 

- SKIP SELF TEST ROUTINE •• 
THIS SUBROUTINE IS USED TO SKIP THE SELFTEST AFTER A DUT RESE1 HAS BEEN 
INITIATED. IT MUST BE ENTERED IMMEDIATELY AFTER SETTING THE DUT MASTER 
RESET ROUTINE OR AFTER THE EXECUTION OF A BUS RESET (BECAUSE OF TIMING 
CONSIDERATIONS). 



INPUTS; 



CSRA CONTAINS ADDRESS OF THE DUT CSR. 

TXBFCA - CONTAINS ADDRES? OF DUT DMA BUFFER COUNT REGISTER. 



OUTPUTS: SKIP SELFTEST CODES ARE WRITTEN TO THE DUT REGISTERS. 

CALLING SEQUENCE; JSR PC, SKPSTS 

COMMENTS! 

SUBORDINATE ROUTINES CALLED: DELAY. 



SKPSTS; : SAVE 

MOV 
JSR 



j SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 jCALL REGISTER SAVE SUBRT 
010.. R4 {PASS DELAY VALUE OF 10 MILLI -SECONDS. 

PC, DELAY jDELAY FOR 10 MILLI -SECONDS. 



; WRITE SKIP SELF-TEST CODE (525'25) TO ALL THE INDEXED OUT REGISTERS. 



MOV JNUMLNSJB 
j THE ABOVE INCLUS 
l LACK OF A M.R, 



4$: 
6i: 



60$ t 



MOV 
D^C 
MOV 
MOV 
MOV 
CMP 

BLO 
BIT 

BNE 

PASS 
RTS 



052525. R3 

Rl 
CSRA.R4 

R1,CR4)» 

R3.CR4)* 

R4, TXBFCA 

6$ 

$17, Rl 

4$ 



IT05.R1 {FORM IND.ADR.REG FIELD (PLUS M.R. BIT) WORD 
ION OF THE M.R, BIT IS NECESSARY BECAUSE OF THE 
BIT WRITE LOCK-OUT ON THE DHU-11. 

I INITIALISE THE SKIP SELF-TEST CODE. 

{SELECT THE MEXT SET OF DEVICE REGISTERS. 

iGET THE ADDRESS OF THE CSR OF THE DUT, 

{SELECT A BANK OF DUT REGISTERS. 

{WRITE THE CODE TO A DUT REGISTER. 

{COMPARE POINTER WITH LAST REGISTER ADDRESS. 

iLOOP IF NOT ALL REGS DONE IN THIS BANK, 

i TEST FOR IND.ADR.REG FIELD DECREMENTED TO 0. 

;l.OOP UNTIL ALL REGISTERS CONTAIN THE CODE. 



PC 



{RESTORE GPRS* 
JSR :C«3(SP)* 



{RETURN TO PREG05 SUBRT. 



6£BBM!°sRB«66h^ c 



TST PARTI MA 



3677 
3b 7 8 
3679 

3680 

3681 

3682 

3683 

3684 

36 8 5 

3686 

368 " 

3688 

368^ 

3690 

3691 

3692 

3693 

3694 

3695 

3696 

3697 

3698 

3699 

3700 

3701 

3702 

3703 

3704 

3705 

3706 

3/07 

3 708 

3709 

3710 

3711 

371? 

3713 

3714 

3715 

3 716 

3717 

3718 

3719 

37^0 

3 721 

3722 

3 7^3 

3/24 

3 /2S 

3 726 

3/2/ 

372Q 



022422 010046 



022424 
022426 
0224 30 
0224 32 
022434 



022436 
022442 
022444 
022446 
022450 
022452 



022454 
022456 
022460 
022462 
022464 

022466 

0224 70 



010146 
010246 
010346 
01044b 
010546 



012700 
012001 
012002 
C12003 
012004 
012005 



012640 
012640 
012640 
012640 
012640 

012600 

000207 



o M1200 
P0 - 
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SEQ 97 



. SBTTL GLOBAL SUBROUTINE - SWAPO - 

* - SWAP GPRS WITH GPR SET ROUTINE - 

* THIS SUBROUTINE SWAPS THE PRESENT CONTENTS OK GPRS Rl THRU R5 WITH 
t* THE CONTENTS OF THE NUMBKR ZERO GPR SAVE AREA, THE CONTENTS OF RO 
{ + ARE NOT ALTERED BY THIS SUBROUTINE. 



GPR CONTENTS Rl THRU R5. 

GPRSOB - LABEL AT BASE OF GPR SAVE AREA NUMBER ZERO. 



{ * INPUTS: 

I* 

}♦ OUTPUTS: Rl THRU R5 CONTAIN THE PREVIOUS CONTENTS OF GPR SAVE AREA 
5* ZERO WORDS 1 THRU 5 RESPECTIVELY. 

j* GPRSO - GPR SAVE AREA WORDS 1 THRU 5, CONTAIN PREVIOUS 

;♦ CONTENTS OF GPRS Rl THRU R5 RESPECTIVELY. 

j* 

I* CALLING SEQUENCE: JSR PC , SWAPO 

j* COMMENTS: THE STATE OF THE CARRY FLAG IS NOT ALTERRED By THIS ROUTINE. 

t* 

j* SUBORDINATE ROUTINES CALLED: NONE. 

SWAPO:: MOV RO.-(SP) 5 SAVE THE CONTENTS OF RO. 



002450 



; LOAD 


THE STACK FROM THE GPRS. 








MOV 


Rl.-CSP) 




j SAVE THE CONTENTS 0* R). . 






MOV 


R2.-CSP) 




j SAVE THE CONTENTS OF R2. 






MOV 


R3, (SP) 




1 SAVE THE CONTENTS OF R3. 






MOV 


R4.-CSP) 




{SAVE THE CONVENTS OF R4 . 






MOV 


R5,-(SP) 




,SAVE THE CONTENTS OF R5. 




1 LOAD 


THE GPRS 


FROM THE GPR 


SAVF AREA 0. 




# 


HOV 


OGPRSOB.RO 




(GET TH*- RASE ADDRESS OF GPR SAvf- AREA 0. 




MOV 


CRO)»,Ri 




jLOAO Rl WITH GPR SAVE AREA WORD 1. 






MOV 


CP0)»,R2 




lLOAD Rl WITH GPR SAVE AREA WORD 2. 






MOV 


(RO)* ,R3 




jLOAD Rl UITH GPR SAVE AREA WORD 3. 






MOV 


(R0)*.R4 




{LOAD Rl WITH GPR SAVE AREA WORD 4. 






MOV 


(R0)»,R5 




jLOAD Rl WITH GPR SAVE AREA WORD 5. 




j LOAD 


THf GPR 


SAVE AREA FROM 


THE STACK, 






MOV 


( SP ) ♦ , ( RO ) 




lLOAO GPR SAVE AREA WORD 5 WITH SAVED 


R5. 




MOV 


( r ;p). , -(RO) 




llOAO GPR SAVE AREA WORD 4 WITH SAVED 


R*. 




MOV 


( SP ) ♦ , ( RO ^ 




(LOAD GPR SAVE AREA WORD I WITH SAVED 


R3. 




MOV 


ts<--;» . -(ro) 




jLOAD GPR SAVE AREA WORD 2 WITH SAVED 


R2. 




MO" 


iSP)», (RO) 




l LOAD GPR SAVE AREA WORD 1 WITH SAVED 


Rl, 



MOV 
RTS 



ISP)*,R0 

PC 



jRESTQRE THE INITIAL VALUE OF RO. 



s^r^'oAur 



TST PARTI 



H8 



m^r 8b m P oo 
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SEQ 98 



5. '30 
3731 

3/W 
3/33 
3734 

3735 
3^36 
373. 7 
3738 
373^ 
3740 
3741 
3742 
3743 
3744 
3745 
3746 
3747 
3748 
3749 
3 750 
3751 

3752 
3753 
3754 

3755 
3756 



375/ 
3758 

3759 



0224 72 
022472 
0224 76 
022502 
022510 
022510 
022512 
022514 
022517 
022522 
022525 
022530 
022533 
022536 
022541 
022544 
02254 7 
022552 
022555 
022560 
022563 
022566 
022571 
0225 7 A 
022577 

022600 
02->600 
02260^ 



004567 
012701 
012767 

104460 

000432 

040 

116 
105 
124 
040 
123 
105 
117 
106 
116 
104 
111 
040 
123 
105 
103 
111 
000 



004 7 36 

oooao7 



161300 
022514 
016526 



116 
055 
114 
105 
124 
124 
122 
122 
117 
104 
125 
116 
124 
124 
130 
125 
117 



161264 



.SBTTi Gl OBAL SUBROUTINE - TSABRT 

. + * ********************* ****************************************************** 

j* - TEST ABORT ROUTINE - 

} * THIS SUBROUTINE IS USED WHEN A NON-TEST RELATED ERROR HAS BEEN FOUND 

j* DURING THE EXECUTION OF THE CURRENT TEST. 

i* IT IS USED TO INFORM THE OPERATOR THAT THE CURRENT TEST HAS BEEN 

s* ABORTED, 

2 * 

j* INPUTS: ERRMSG - CONTAINS THE NAME OF THE CURRENT TEST. 

} * ERRNBR - CONTAINS THE CORRECT ERROR NUMBER. 

5 * THE REMAINDER OF THE ERRfBL IS CORRECTLY INITIALISED. 

5* 

;* OUTPUTS: MESSAGES ARE REPORTED TO THE OPERATOR. 

I* 

i* CALLING SEQUENCE; JSP PC, TSABRT 

{* 

;* COMMENTS: 

5* 

i* SUBORDINATE ROUTINES CALLED: ER1603. 

. - - *************************************************************************** 



TSABRT: : SAVE 



vJSR 



117 2$: 
122 

101 
104 
105 
040 
122 
040 
125 
040 
122 
107 
105 
040 
105 
124 
116 



{SAVE CONTENTS OF GPRS RO THRU R5 . 
R5.PREG05 {CALL REGISTER SAVE SU6RT. 
MOV 02$. Rl jPASS ADDRESS OF FIRST MESSAGE TO BE REPORTED. 

MOV 0ER16O3.ERRBLK jSilT-UP THE ERROR REPORTING ROUTINE. 
ERROR j >>>>> ERROR <<<<<. 

TRAP CSE'IROR 
BR 60$ j 

•ASCIZ / NON-RELATED TEST ERROR FOUND DURING TEST EXECUTION/ 



.EVEN 
60 $i 



PASS 
RTS 



PC 



jRESTURfc GPR< 
USR PC.SCSP)* 



{RETURN TU PREG05 SU6RI. 



C/DHUrtO [)HU ll KiNC 

globa; subroutine 

3 7b 1 
3762 
3 7b 5 
3764 
3 765 
37bb 
3<>"' 
3"t>8 
? 76 c > 
3.'"0 
3 " t 
3 : ?3 
?'.';? 

3"4 
3 * 7 5 
6 



1ST PARTI 



a 



3 
3 

3" 79 
3 '80 

3781 
3 782 
3 783 
3784 



3785 
3786 
378? 
3788 
3 769 
3 790 
3791 
3 792 
3793 
3 794 
3 795 
3 796 
3797 
3798 
3 799 
3800 
3801 
380? 
3803 
3004 
3805 
3806 

38 o; 

3808 
3809 
3810 
3811 



3«l2 

7 i813 



022604 
022604 
022610 
022612 
022616 
022622 
022624 
0, 2630 
022634 



022636 
022642 
022644 

022646 



022650 
022652 
022654 
022660 
022662 
022664 
022666 

0226 70 
0226 70 
0226 74 



00456 7 
010500 
012701 
016702 
005202 
012703 
016 704 
005005 



010477 
105^12 
100001 
050105 



030100 
001402 
142/12 
005204 
006301 
005 303 
001365 



010566 
004 7 *6 



MACRO M1200 
- TXDSBL 

.SB 

I * * 
»♦ 

* 

J* 

+ 
♦ 

J* 
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TTL GLOBAL SUBROUTINE - TXDSBL - 

***&**&&****. a**************.**************************** + ♦*♦•*»♦* + *******♦♦* 

- TRANSMITTER DISABLE - 
THIS SUBROUTINE IS USED TO DISABLE TRANSMISSION ON SELECTED LINES BY, 
CLEARING THE ASSOCIATED TX. ENABLE BIT ON THE OUT, 



SEQ 99 



INPUTS: 



OUTPUTS: 



R5 - BIT'S SET CORRESPONO TO LINES ON WHICH TO CLEAR TX. ENABLE. 
CSRA - CONTAINS THE ADDRESS OF THE OUT CSR. 

IESTAT - CONTAINS THE STATE OF TXIF. ANO RXIE BITS IN THE CSR. 
NUMLNS • EQUATED TO BE THE MAXIMUM NUMBER OF LINES AVAILABLE. 
TXAD2A - CONTAINS THE ADDRESS OF THE TBUi FAD2 REGISTER. 

R5 - BIT'S SET INDICATE THE INITIAL. STAiLS OF ALL TX.ENBLE BITS 

TBUTFAD2 - THE STATE OF" THE TX.ENBIF BT f MA r RE ALTERFD. 

THE CONTENTS OF THE INO.ADD.REG FIELD IN THE CSR ARE DESTROYED. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC, TXDSBL 



SUBORDINATE ROUTINES CALLED; NONE. 



TXDSBL; : SAVE 



161166 

000001 
157434 

000020 
157454 



157400 



SELECT 



2$: 





JSR 


MOV 


R5.R0 


MOV 


OBIT0.R1 


MOV 


TXAD2A.R2 


INC 


R2 


MOV 


0NUMLNS,R3 


MOV 


IESTAT, R4 


CLR 


R5 


EVERT 


LINE IN TURN 


MOV 


R4.UCSRA 


TSTB 


(R2) 


DPL 


4$ 


BIS 


R1.R5 



CLEAR TX.ENBLE 
LINE KIT MAP. 



{SAVE CONTENTS OF GPRS RO THRU R5 . 

R5.PREG05 {CALL REGISTER SAVE SUBRT. 

{COPY BIT MAP OF LINES TO DISABLE TRANSMISSION. 

{INITIALIZE THE SELECTED LINE BIT MASK. 

{GET THE ADDRESS OE THE TBUFFAD2 REGISTER. 

{GET THE ADDRESS OF \Hf. MSBYTE OF TBUFFAD2 REG. 

;GET MAXIMUM LINE NUMBER PLUS ONE. 

{GET THE STATES OF THE INT ENABLE BITS. 

{LOG POSSIBLE TX DISABLED ON ALL LINES* 

AND LOG THE STATE OF EACH TX. ENABLE BIT. 

{WRITE TO OUT CSR TO SELECT LINE REGISTERS. 
iCHECK STATE OF TX. ENABLE BIT ON SELECTED LINE. 
{SKIP NEXT INSTRUCTION IF TX. ENABLE Cl.FAR. 
{LOG TX ENABLE BIT SET FOR SELECTED LINE. 

ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE T X DISABLE 



000200 



4$ 



6$ 



60$: 



000014 



0226 76 OOC20 7 



BIT 
BEU 

B1CB 
INC 

A:,l 

DEC 
BNF 

PASS 



RT 



Rl.RO 

61 

W I T 7 , C R2 > 

R4 

Ml 

R3 

2 5 



{CHECK STATE Of DISABLE 
{BRANCH IF THIS LINE TO 
{CLEAR TX. ENABLE BIT ON SELECTED 



LINE BIT HAP. 
REMAIN UNALTERED. 



{PREPARE TO SELECT REGISTERS 
{SHIFT hXT MAP FOR NEXT LINE 
{DECREMENT LINE NUMBER. 
tl OOP TO CHfCK Ni.xT I INE\ 



FOR 



I INE 
NEXT 



LINE 



R5 



PC 



MOV 
JSR 



{RESTORE GPRS, EXCEPT 

R5,R5SL0TCSP") 

PC.oJCSP^ 

jR5 PREVIOUS STATES 



>LC 



;PUT MS IN STACK 
jRE TURN JO PRECIS >. BR T 
OF Al I TX.ENABl E BIT-;. 



J 



H 



C/DHUHO i)HV 11 U'NC 
GLOB At SUBROUTINE 



3815 

38K 
3818 
38 b> 
3820 
3821 
3822 
382^ 
3824 
3825 
382b 
382* 
3828 
3829 
38?0 
3851 
3832 
3855 
3854 
3835 
3856 
385- 
3858 



TST »»ARU 



3859 
3840 
3841 
384? 
384 5 
3844 
3845 
3846 
384? 
3848 
3849 
3850 
3851 
385c? 
3855 
3854 
3855 

3856 
3857 
3858 
3859 
3860 
3861 
386 c? 
3365 
3864 
3865 



0*?.? 700 
022/00 
022704 
022706 
022712 
022716 
022720 
022/24 
022730 



0227 32 
0227 36 
022740 
022742 



022744 
022746 
022750 
022 754 
022756 
022/60 
022 762 

022/64 
022 UA 

022770 



3866 
386 ' 
5868 



00456 / 

010500 
012701 
016702 
005202 
012/03 
016704 
005005 



010477 
10571? 
100401 

050105 



030100 
001402 
15271? 
005204 

006301 
005303 
001563 



010566 
004 736 



MACHO M1200 

TXENBl 
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SEQ 100 



S8TTI GLOBAL. SUBROUTINE - TXENBL - 



TRANSMITTER ENABLE 
THIS SUBROUTINE IS USED TO ENABLE 
SETTING THE ASSOCIATED TX. ENABLE BIT ON THE DUT 



TRANSMISSION 



ON SELECTED LINES Br 



INPUTS? 



OUTPUTS 



R5 - BIT'S SET CORRESPOND TO LINES ON WHICH TO SET TX. ENABLE. 
CSRA - CONTAINS T HE ADDRESS Of THE OUT CSR. 

IESTAT - CONTAINS THE STATE OF TXIE AND RXIE BITS IN THE C" a R. 
NUMLNS - EQUATED TO BE THE. MAXIMUM NUMBER OF LINES AVAILABLE. 
TXAD2A - CONTAINS THE ADDRESS OF THE TBUTFAD2 REGISTER. 

R5 - BIT'S SET INDICATE PREVIOUSLY DISABLED LINES. 

TBUFTAD2 - THE STATE OF THE TX.ENBLE BIT MAr BE ALTERED. 

THE CONTENTS OF THE INO.ADD.REG FIELD IN THE CSR ARE DESTROYED 



CALLING SEQUENCE; 
COMMENTS: 



JSR 



PC .TXENBL 



SUBORDINATE ROUTINES CALLED: NONE. 



161072 

0000C1 
1573AC 

000020 
157360 



157304 



TXENBL,: SAVE 

MOV 
MOV 
MOV 
INC 
MOV 
MOV 
CLR 



JSR 
R5.R0 
*6IT0,R1 
TXAD2A.R2 
R? 

ONUMLNS. R3 
IESTAT.R4 
R5 



iSAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 iCALL REGISTER SAVE SU6RT . 

iCOPY BIT MAP OF LINES TO ENABLE. 
INITIALIZE THE SELECTED LINE BIT MASK. 
jGET THE ADDRESS OF" THE TBUFFAD2 REGISTER. 
,GEl' THE ADDRESS Of THE MS8YTE Of" TBUFFAD2 
sGET MAXIMUM LINE Nl*1BER . 
(GET THE STATES OF THE INT ENABLE BITS. 
jCLEAR TX. ENABLE BIT LOG OF DISABLED LINES 



REG 



? ♦ 



SELECT EVERY LINE IN TURN, AND LOG ANV T X.EN6LE BIT THAT IS CLEAR. 



2$: 



MOV 
TSTB 
BMI 
BIS 



R4»&C5RA 
(R?) 
4$ 
R1.R5 



iWRITE TO DUT CSR TO SELECT LINE: REGISTERS, 
j CHECK STATE OF" tx, ENABLE BIT ON SELECTED LINE 
;SKIP NEXT INSTRUCTION IF TX. ENABLE SET. 
; LOG IX ENABLE BIT CLEAR FOR SELECTED LINE. 



000200 



000014 



022 //? 00020/ 



SET TX.ENBLE ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE TX ENABLE 
LINE BIT MAP. 

i CHECK STATE OF TX. ENABLE LINE BIT MAP. 
jBRANCH IF THIS LINE TO REMAIN UNALTERED. 
{ENABLE TRANSMISSION ON SELECTED LINE. 
{PREPARE TO SELECT REGISTERS FOR NEXT LINE. 
{SHIFT rilT MAP FOR NEXT LINE* 
{DECREMENT LINE NUMBER. 
jLOOP TO CHECK NEXT LINE. 

{RESTORE GPRS. EXCEPT 

H5.R5SL0H 5P) (HUT R5 IN STACK 51 IT 1 . 

PC^CSPV {RETURN TO PREG05 SUBRT 

jR5 i INt BIT MAP CORRESPONDING TO THE 

; PREVIOUS LINES THAT WERE DISABLED, 



4V: 


BIT 


Rl ,R0 




BEQ 


6i 




BISB 


OBIT /,(R2) 


ett 


INC 


R4 




ASt 


Rl 




DEC 


R3 




BN[- 


2$ 


60$: 


PAS5 


R5 

MOV 
JSR 



RT5 



PC 



SiM sP«h^" 
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r >EQ 101 



38 .'0 

38/1 
38 V 
33*3 

3874 
3875 
38^6 
38 7 7 
38*8 
38 7<> 
3880 
3881 
388c"? 
3883 
3884 
3885 
3886 
3887 
3888 
3889 



1890 



3891 
389? 
3893 



3894 
3895 



0227 74 
022 7 /6 
0227 76 

023000 
023002 
023002 
023006 
023010 
023016 
023024 
023024 
023026 
023030 
023032 



010046 

104440 
010046 

012700 

104441 
042767 

016777 

012600 

104441 
012600 
00020? 



.SBTTl GLOBAL SUBROUTINE - TXIEO - 

* - TRANSMITTER INTERRUPT [SABLE 

* THIS ROUTINE 1$ USED TO DISABLE TRANSMITTER INTERRUPTS IN THE DHU11. 

* 

* INPUTS: NONE. 

* 

* OUTPUTS: THE Ta.INT.ENBL BIT IS CLEARED IN THE DOT CSR. 

* IESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 

* ENABLE BITS. 

* 

j+ CALLING SEQUENCE: J5R PC. TXIEO 

* COMMENTS: THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD IN 

* THE DUT CSR ARE DESTROYED. 

* SUBORDINATE ROUTINES CALLED: NONE. 

- . timA***.**-*****-*.*****.*-*.*.*.*****-**-********** ***■* + ** + ** + *■*** + ** + ** + *******■** + 

TXIEO:: MOV RO.-CSP) 
GETPRI -CSP) 



000340 

17 7677 
157266 



1572/2 
157216 



SETPRI 0PRI07 



BIC n7767/,IESTAT 
MOV IESTAT.3CSRA 
SETPRI CSP)* 



MOV 
ITS 



(SP)f.RO 
PC 



iSAVE CONTENTS OF' RO ON THE STACK. 

j SAVE CURRENT PROCESSOR PRIORITY ON THE STACK. 

TRAP CIGPRI 
MOV RO.CSP) 

{IGNORE ANY INTERRUPTS THAT MAY BE GENERATED. 

MOV OPRI07.R0 
TRAP C*SPRI 

jCLEAR TX.INT.ENSL BIT IN IESTAT. 

{DISABLE TX INTERRUPTS. 

lENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 

MOV (SP)*.RO 
TRAP CSSPRI 

{RESTORE RO. 



CZDHU80 DHU-11 K«NC TST PARTI 
GLOBAL SUBROUTINE 

3897 

3898 
3899 
3900 
3901 
390? 
3903 
3904 
3905 
3906 
3907 
3908 
3909 
3910 
391.1 
3^i2 
3913 
3914 
3915 

3916 023034 052767 040000 

3917 023042 042767 137677 

3918 023050 0167 77 157234 

3919 023056 000207 



MACRO M1200 
- TXIE1 - 
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L8 

PAGE 79 



SEQ 102 



157246 
157240 
157164 



.SBTTL GLOBAl SUBROUTINE - TXIE1 - 

* - TRANSMITTER INTERRUPT ENABLE - 

* THIS ROUTINE IS USED TO ENABLE TRANSMITTER INTERRUPTS IN THE DHU11. 
♦ 

* INPUTS; NONE. 
* 

* OUTPUTS: THE TX INT.FNBL BIT IS SET IN THE OUT CSR . 

j+ IESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 

5* ENABLE BITS. 

5 * 

;♦ CALLING SEQUENCE: JSR PC.TXIE1 

J* 

j* COMMENTS THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD IN 

;♦ THE OUT CSR ARE DESTROYED, 

5* SUBORDINATE ROUTINES CALLED: NONE. 

J.. *** + * + *** + + ***** + ** + ******** + **** + ¥**** + ** + + * + **. + +* + ** + * + *** + *** + * + + *.****** 

TXIElji BIS 0HIT14.IESTAT t SET TX.INT.ENBL BIT IN IESTAT. 

BIC **137677, IESTAT {CLEAR ALL BITS EXCEPT TX RX I.E BITS. 

MOV IESTAT, SCSRA {ENABLE TX INTERRUPTS. 

RTS PC 



M8 
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SEQ 103 



3921 

3922 
3923 

3924 
3925 

3926 
3927 
3928 
3929 
3930 
3931 
3932 
3933 
3934 
3935 
3936 
3957 
3938 
3939 
3940 
3941 
3942 
3943 
3944 

3945 
3946 
3947 
3946 
3949 
3950 
3951 
3952 
3953 
3954 
3955 
3956 
395/ 
3958 
3959 
3960 
3961 
3962 
3963 
3904 
3965 
3966 
396 7 
3968 
3969 
39/0 
3971 

39/2 
39 / 5 
39/4 
39/5 
3976 



023060 
023060 



023064 
023066 
025070 
023072 
023076 



023100 
023102 

023104 
023106 
023110 



023114 
023116 
023120 
023122 
025124 
023126 
023130 



023132 
023134 



004567 160712 



010204 
160104 
103403 
012701 
000442 



005004 
0OO241 
006001 
006004 
01<?700 



010246 
01^346 

160403 
005602 
103402 
160102 
103003 



012605 
012602 



177777 



000020 



.SBTTL GLOBAL SUBROL TINE - UNSDIV - 

• ♦■♦ **. + .+ *****.** + + ***-; * + **** + * + + ******♦** + *** + + **♦* + + + *+ + **** + + + * + . > + + * + ** + + + **+* 

i* - UNSIGNED DIVIDE ROUTINE - 

5* THIS SUBROUTINE IS USED TO DIVIDE A 32 BIT UNSIGNED DIVIDEND BY A 

j* 16 BIT UNSIGNED DIVISOR GIVING A 16 BIT QUOTIENT. ALL NUMBERS ARE 

5* CONSIDERED TO BE UNSIGNED. A SUCCESS FLAG IS NOT SET ON RETURN IF 

;♦ THE QUOTIENT WAS TOO BIG TO BE CONTAINED IN 16 BITS. 

: + 

i+ INPUTS: Rl ■• THE DIVISOR, UNSIGNED, 16 BITS. 

I* R2 - MOST SIGNIFICANT WORD OF THE DIVIDEND, UNSIGNED, 16 BITS. 

} * R3 - LEAST SIGNIFICANT WORD OF THE DIVIDEND. UNSIGNED, 16 BITS. 

5* OUTPUTS: Rl - QUOTIENT, UNSIGNED, 16 BITS (177777 IK OVERFLOW). 

{♦ CARRY - SUCCESS FLAG, SET IF COMPLETE QUOTIENT FITS IN 16 BITS. 



JSR 



PC, UNSDIV 



j* CALLING SEQUENCE: 

;* 

;* COMMENTS: IF THE DIVISOR IS THE QUOTIENT IS RETURNED AS ALL ONES 

j* C 177777) AND THE CARRY IS CLEAR REGARDLESS OK THE DIVIDEND. 

;* 

:♦ SUBORDINATE ROUTINES CALLED: NONE. 

. - - +**** + *********** + ******* + + *** + * + + + * + + + * + + ** + + + * + + + + * + ** + +** + * + + + + + + * + + + + + + 

UNSDIV:: SAVE 



JSR 



{SAVE CONTENTS OF GP.o RO THRU R5. 
R5,PREG05 ;CALL REGISTER SAVE SUBRT. 



CHECK FOR QUOTIENT GREATER THAN 16 BITS CONDITION. 



MOV 
SUB 
BCS 
MOV 
BR 



R2.R4 

R1.R4 

2$ 

1,R1 

60$ 



{GET MSW OF DIVIDEND FOR SUBTRACT, 

{SUBTRACT DIVISOR FROM MSW OF DIVIDEND. 

{IF IT DIDN'T GO. WE HAVE nuQTIENT < 16 BITS. 

{SET QUOTIENT TO ALL ONES C177777), 

jEXIT WITH CARRY CLEAR. 



SET UP COUNTERS AND VARIOUS WORKING GPRS. 
2$: CLR R4 



CLR 

CLC 

ROR Rl 

ROR H4 

MOV 016., RO 

THE SUBTRACT AND SHIFT LOOP. 



4$ 



MOV 

MOV 
SUB 
SBC 
BCS 
SUB 
BCC 



R2, -CSP) 

R3. -CSP) 

R4.R3 

R2 

6t 

R1.R2 

8$ 



CLEAR THE LSW <)i~ 1HE DIVISOR. 

CLEAR CARRY FOR THE SHIFT OF THE DIVISOR. 

DIVISOR By 

2( UNSIGNED"* 
SET UP INITIAL SHIFT TOUNT 10 16. 



{SAVE MSWORD OF DIVIDEND. 

;SAVE LSWORO OF DIVIDEND. 

iLSWORD DIVIDEND I. SWORD OF DIVISOR. 

i MSWORD DIVIDEND ~ BORROW , 

{IF BORROW FROM BORROW SUBTRACT, IT DIDN'T GO. 

{MSWORD DIV-OENO - MSWJRD OF DIVISOR. 

j IF NO BORROW, If WENT. CARRY IS CLEAR. 



; IT DIDN'T CD. SO WE SHIFT A 1 INTO THE QUOTIENT (COMPLEMENTED LATER). 
{ CARRY IS SET. 



6* 



MOV 
MQV 



(SP)»,R3 
(SP)*,R2 



{RP STORE LSWORD OF DIVIDEND. 
tRESTORE MSWORD OF DIVIDEND. 



&t8Bxr-»M/Nr c 



TST PARTI 



397 7 
3^/8 
39/9 
3980 
3981 
3982 
3983 
3984 
3985 
3986 

398 7 
3988 
3989 
3990 
3991 
3992 
3995 
3994 
3995 
3996 
3997 
3998 
3999 
4000 
4001 
400? 
4003 
4004 
4005 
4006 
4007 
4008 
4009 
4010 
4011 
4012 
4013 



4014 
4015 



023136 000401 



023140 012626 



023142 
023144 
025146 
023150 
023152 
025154 
023156 



023160 
023162 
023164 
023166 
023170 



023172 
025174 
023176 



023200 
025202 

023204 
023204 
023210 



006105 
00024 1 
006001 
006004 
005300 
001557 
005105 



00024 \ 
006105 
103402 
160403 
103403 



005205 
001001 
005305 



010501 
000261 
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SEG 104 



B^ 



10^ 



jGOTO SHIFT 1 INTO THE QUOTIENT, 



8$ 



10$ 



IT WENT, SO WE RESTORE THE STACK AND SHIFT A INTO QUOTIENT CWILL BE 
COMP.EMENTED LATER). CARRY IS CLEAR. 

MCtf (SP)*.(SP)» {POP THE SAVED DIVIDEND OFF OF THE STACK. 

SHIFT THE RESULT OF THE SUBTRACT ATTEMPT INTO THE QUOmNT SHIFT REG. 

R5 



ROL 
CLC 
ROR 
ROR 
DEC 
BNE 
COM 



Rl 
P4 
RO 
4$ 
R5 



SHIFT NEXT BIT INTO THE INVERTED QUOTIENT. 
DIVIDE THE 

DEVISOR BY 
5 2 (UNSIGNED). 
COUNT THIS SHIFT AND SUBTRACT. 
LOOP FOR ANOTHER SHIFT £ SUB IF NOT DONE. 
GET QUOTIENT FROM INVERTED QUOTIENT. 



NOW WE EITHER ROUND UP OR LEAVE QUOTIENT ALONE. 



CIC 
ROL 
BCS 
SUB 
BCS 



R3 

12$ 

R4.R3 

14$ 



ROUND UP, EXTRA SUBTRACT WENT 
12$: 



INC 
BNE 
DEC 



R5 

14$ 

R5 



iCLEAR THE CARRY FOR THE SHIFT OF THE DIVIDEND. 
{MULTIPLY LSWORD OF DIVIDEND BY 2, MSWORD IS 0. 

IF CARRY FROM SHIFT, ROUND UP. 

SUBTRACT DIVISOR FROM DIVIDEND. 

IF BORROW, DON'T ROUND UP. 



{INCREMENT THE QUOTIENT BY ONE. 

5 IF NO OVERFLOW, WE LEAVE THE ROUND UP. 

sDON'T LET ROUNDING CAUSE OVERFLOW. 



ALL DONE, PASS QUOTIENT AND EXIT. 
I4$r 



010166 000004 
004 7 36 



60$ 



023212 00020V 



MOV 
SFC 

PASS 



RTS 



«5 % R1 {PASS GUOTIENT BACK IN Rl. 

5TNPTCATF NO OVERFLOW, 

Rl {RESTORE GPRS, LEAVE THE FOLLOWING INTACT: 

MOV Rl.RlSLOTCSrO ;PUT Rl IN STACK SLOT. 

JSR PC,6)(S D )» ; RETURN TO PREG05 SUBRT, 

•,R1 16 BIT, UNSIGNED QUOTIENT, 

PC {CARRY - SET INDICATES NO OVERFLOW (SUCCESS). 
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4017 

4018 
4019 

4020 
4021 
4022 
4025 
4024 
4025 
402e* 
40.? * 
4028 
402* 
40 V 
4051 
40V 
405? 
4054 
4055 
4056 
405 7 
4056 
4059 

4040 
4041 
404*? 
4045 
4044 
4045 



1ST PARTI 



4046 
404? 

4048 
4049 
40S0 
4051 
4052 
4055 
4054 
4055 
4056 
40b/ 
4058 
4059 



4o#>U 
4061 



025214 
02 5,? 14 
025220 
025222 
025224 
0252 50 
025254 
025256 
025240 
025242 
025244 

023250 

025252 

025256 
025260 
02 5260 

02 5264 



00456? 
010204 
010102 
042701 
042702 
0OO502 
0O6202 
006202 
006202 
016202 
005005 
004 76 7 

010002 

010266 

004 7 56 
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5EQ 105 



SBTTL GLOBAL SUBROUTINE 



WAIBIC 



- WAIT FOR BIT CLEAR ROUTINE - 
THIS SUBROUTINE WAITS FOR THE SPECIFIED BIT TO BECOME CUAR. IF THE 
SPECIFIED BIT GOES TO A CLEAR STATE WITHIN THE SPECIFIED TIME-OUT 
f^.RIOO A SUCCESS INDICATION IS RETURNED BY THIS ROUTINE.. 
fhC LAST VALUE WHICH IS READ LOOKING FOR THE CONDITION IS RETURNED TO 
At.l.OU THE USE OF THIS ROUTINE TO LOOK FOR DESTRUCTIVE READ CONDITIONS 



INPUTS; 



Rl • TIME-OUT VALUE. ANO BIT NUMBER INDICATION: 

BITS 15 THRU 12 NUMBER OF BIT TO TEST (RANGE THRU 15V 
BITS 11 THRU • TIME-OUr VALUE IN MILLI SECONDS (4095 MAX) 

R2 • ADDRESS OF WORD CONTAINING THE, BIT TO TEST. 
MSLCNT, 



OUTPUTS: 



R2 



THE LAST WORD WHICH WAS READ 



CARRY - SUCCESS FLAG (CARR^ SET V 



TO CHECK FOR THE CONDITION 
BIT CLR BEFORE TIME OUT). 



CALLING SEQUENCE: 



COMMENTS: 



MOV 61 50040, Rl 

MOV Ol ABE I ,R2 
JSR PC, WAIBIC 



iPASS BIT U (15 OCTAL) ANO 
I 52 (40 OCTAL ) MS OELAr . 
I TEST BIT IN W(WD AT "LABEL*. 
{WAIT 32 MS FOR BIT 11 TO CLR 



SUBORDINAIE ROUTINES CALLED: MSI GET. 



160556 



1 70000 
007777 



002410 
174 706 

000006 



WAIBIC: s SAVE 

MOV 
MOV 
BIC 
BIC 
SWAB 
ASM 
ASR 
ASR 
MOV 
CLR 
JSR 



JSR 
R2.R4 
R1.R2 
0170000.R1 
*777/ l R2 
R2 
R2 
R2 
R2 

BIT TBI (R2),R2 
R5 
PC, MSI GET 



j SAVE CONTENTS Of GPRS RO THRU R5 . 
R5.PREG05 i CALL REGISTER SAVE SUBRT 

'•" LIP THE ADDRESS PARAMETER FOR MSl.GET. 



I SET 



6Qfi 



023266 000207 



MOv 
PASS 



RtS 



h0,R2 
W2 



PC 



MOV 



>SEPERATE DELAi COUNT OUT Of PASSED PARAMETFP. 
I St PI RATE LINE NUMBER FIELD OF PASSED PARAM, 
|PUT LINE NUMBER FIEIO IN ISByTE. 
iSHP T THE LINE NUMBER FIELD INTO THE PROPER 
j POSITION TO USE I! AS A WORO TABLE Of * y\ . T 
I FOR THE TABLE LOOKUP OF THE LINE BIT MAP. 
iGFT BIT MAP 0* LINE TO TEST FROM TABU. 
I INDICATE THAT THE BIT SHOU D BE CLR. 
jWAIT FOR THE BIT TO BE CLP WITHIN TIME CK'T. 
i CARPI IS CORRECT UPON MSLGET RETURN. 
jPASS LAST VALUE READ AS OUTPUT PARAMETER. 
I RE STORE GPRS, EXCEPT THE FOLLOWING: 
R2.R2SL0TCSP) jPUT R2 IN STACK Si 1 . 

PC46KSP). j RETURN TO PRE.G05 m «R T 

j ^J LAST vAi.ijf HEAD lUOKLNi. ► 0« CONDITION, 
1 CARRl • SUCCESS FLAG ^it* IF UIT FQUND CLR\ 



»r,RtfUh^ 



NC 1ST PARTI MACK 



mm 



200 
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SEO 106 



40f>3 
4064 
40*5 

4066 
406 * 
4068 

406 ( > 

40 v 

40. '1 
407.7 
40'* 5 
40^4 

40 rs 

40 "6 

40 * 7 
40 -6 
4079 
4080 
4081 
4082 
4085 
4084 
4085 
4086 
408 7 
4088 
4089 
4090 
4091 

4092 
4093 
4094 
4095 
4096 
4097 
4098 
4099 
4100 
4101 
410,? 
4103 
4104 
4105 



4106 
4107 



0232 ro 
0232/0 
0232 74 
023276 
023300 
023304 
023310 
023312 
023314 
023316 
023 320 
023524 
023326 

023332 
023 534 
025 334 

023 340 



025342 



00456/ 
010204 
010102 
042701 
042/0 : 
0OO30i: 
006202 
006 2 C\! 
006202 
01*002 
010203 
004.^7 

010002 

010266 
004 7 36 

00020? 



SBTTL 
» * + 



GLOBAL SUBROUTINE". 



WAI8IS 



WAIT FOR BIT SET ROUTINE - 
THIS SUBROUTINE WAITS FOR THE SPECIFIED BIT TO BECOME SF T . V THE 
SPECIFIED BIT GOES TO A SET STATE WITHIN THE SPECIFIED TIME-OUT 
PERIOD A SUCCESS INDICATION IS RETURNED By THIS ROUTINE.. 
THE LAST VALUE WHICH IS READ LOOKING FOR THE CONOITION IS RETURNED TO 
ALLOW THE USE OF THIS ROUTINE TO LOOK FOR DESTRUCTIVE READ CONDITIONS 



INPUTS: 



OUTPUTS: 



Rl • TIME-OUT VALUE ANO BIT NUMBER INDICATION: 

BITS 15 THRU 1.2 e*JM8ER OF BIT 10 TEST CRANGF THRU 15). 
BITS 11 THRU - TIME-OUT VALUE IN MILLI SECONDS (4095 MAX) 

R2 ADDRESS OF WORD CONTAINING THE, BIT TO TEST. 
MSLCNT. 

R2 - THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONOITION. 
CARRY - SUCCESS FLAG (CARRY SET IF BIT SET BEFORE T IMF -OUT). 



CALLING SEQUENCE: 



MOV 0130040, Rl 

MOV 01ABEL.R2 

JSR PC.WAIBIS 



jPASS BIT 11 (13 OCTAL) AND 
j 32 (40 OCTAL) MS DEI At . 
I TEST BIT IN WORD AT "LABEL '. 
jWAIT 32 MS FOR BIT U To SET 



COMMENTS: 

SUBORDINATE ROUTINES CALLED: MSLGE T . 



160502 



1 70000 
007 77/ 



002410 
174632 

000006 



WAIBIS:: SAVE 



601: 





JSR 


MOV 


R2,R4 


MOV 


R1.R2 


BIC 


0170000, Rl 


BIC 


»777/,R2 


SWAB 


R2 


ASR 


R.i 


A5R 


R2 


ASR 


R2 


MOV 


BIT TBI (R2). 


MOV 


R2.H5 


JSR 


PC, MSLGET 


MOV 


R0.R2 


PASS 


R2 




MOV 




JSR 



RTS 



PC 



tSAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 iCALL. REGISTER SAVE SUBRT. 

jSET UP THE ADDRESS PARAMETER FOR MSLGET. 

iSEPERATE DELAY COUNT OUT OF PASSED PARAMETER. 
jSEPERATE LINE NLMBfR FIELD Of PASSED PARAM. 
jPUT LINE NUMBER ^liLD IN LSByTE. 
I SHIFT THE LINE NUMBER FIELD INTO THE PROPER 
I POSITION TO USE IT AS A WORD TABLE OFFSET 
j FOR THE TABLE LOOKUP OF THE LINE BIT MAP, 
jGET BIT MAP OF LINE TO TEST FROM TABLE. 
t INOICATF THAT THE BIT SHOULD BE SET. 
jWAIT FOR THE BIT TO BE SET WITHIN UMf OUT. 
j CARRY IS CORRECT UPON MSLGET RFTURN. 
iPASS LAST VALUE READ AS OUTPUT PARAMETFR. 
jRESTORE GPRS, EXCEPT THE FOLLOWING; 
R2,R2SL0USP> jPUT R2 IN STACK SLOT. 

pc.etsp). j re turn :o precos si*wt 

1 R2 LAST VALUE READ LOOKING > OR CONDITION. 
i CARRY - SUCCESS FLAG (SET IF BIT FOUND tiEO, 



6cBeHP°sRBH6Ah^ 



NC TST PARTI 



MA 



&BP D H 



1200 



D9 
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5E.Q 10 7 



4109 
4110 
4111 
411^ 
411? 
4114 
4115 
4U6 
411 ' 
411$ 
411^ 
4U?0 
4121 
41 22 
4123 
4124 
4125 
4 1^6 
4UV' 
4128 
41?o 

4130 

4131 

4132 

4133 

4134 

4135 

4136 

413,' 

4138 

413^ 

4140 

4141 

414? 

414 < 

4144 

4145 

4146 

414; 

4148 

4149 

4150 

4151 

4152 

4153 

4154 

4155 

4156 
415? 
4158 
4159 
4160 
4161 
4162 
416'. 
4164 
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- WOPDR 



023344 
033344 



004567 16042* 



023350 005005 



023552 010204 



l 



J* 
«<■ 
\* 
i* 
J* 
i* 
J* 
(♦ 
5* 
I* 

;* 
i* 
»♦ 
j * 

}* 
;♦ 
i* 
i* 
*♦ 
j* 
;* 
{♦ 
i* 
i* 
i* 
i* 
j* 
i* 
i* 
I* 
s* 
i* 

!• 
t * 



WRITE DATA PATTERN TO DEVICE REGISTERS - 
THIS ROUTINE WRITES A ROTATED DATA PATTERN TO EACH OF THE 6 DEVICE 
REGISTERS OF EACH ACTIVE LINE OF THE DEVICE UNDER TEST. 
THE DATA PATTERN T.S ROTATED ONCE AFTER EACH WRITE TO A DEVICE REGISTER 
ON A PARTICULAR LINE. THE STARTING DATA PATTERN FOR EACH LINE 
IS ROTATED ONCE AFTER WRITING ALL THE REGISTERS ON A PARTICULAR 
LINE, THIS LEADS TO THE FOLLOWING DATA PATTERN: 



LINE 

LINE 

LINE 
LINE 



0, 

0. 

1, 
2. 



REGISTER 
REGISTER 

REGISTER 
REGISTER 



SHIFTED 
SHIFTED 

SHIFTED 
SHIFTED 



BIT 

BIT 

BIT 
BIT 



POSITIONS 

POSITION 

POSITION 

POSITIONS 



ANY BITS FIELDS IN THE DEVICE REGISTERS THAT 
ARE MASKED OUT OF THE DATA PATTERN BEFORE IT 
THIS ROUTINE WILL USE EITHER MOV, MOVB, BIS, 
INSTRUCTIONS. THE UPPER OR LOWER BYTE, CAN BE 



CANNOT BE ALTERED 
IS WRITTEN. 
BISB, BIC, OR BICB 
SPECIFIED FOR WRITING 



INPUTS: 



R2 - USED TO PASS IN THE DATA PATTERN TO BE ROTATED £ WRITTEN. 
R3 - BYTE IN0ICA10R (- ■> LO BYTE, » •> HI BYTE, -> BOTH), 
R4 OPERATION TYPE INOICATOR ( •> BIC, ♦ "> BIS, •> MOV). 



ACTLNS 

CSRA - 

DRADRT 

LPRO 

NUMLN5 

TXBFCO 

UNBTTB 



- BIT MAP OF THE ACTIVE LINES ON THE DEVICE UNOER TEST 
CONTAINS THE CSR ADDRESS OF THE DEVICE UNDER TEST. 

- BASE ADDRESS OF DEVICE REGISTER ADDRESS LU't.E . 
EQUATED TO l.PR REG OFFSET FROM DEVICE CSR ADDRESS. 

- NUMBER OF LINES ON THE DEVICE UNOFR TEST. 



EQUATED TO TBUFFCT REG OFFSET FRO* DEVICE 
BASE ADDRESS OF THE UNUSED BIT TABLE. 



CSR ADDRESS. 



OUTPUTS 
CALLING 
COMMENTS: 



DEVICE REGISTERS ON ALL ACTIVE DEVICE LINES ARE MODIFIED. 



JSR 



PC.WDPDR 



THIS ROUTINE DOES NOT WRITE DATA TO THE FOLLOWING REGISTERS 

RBL* 

RXTIMER 

STA.T 

FT:"OSUE 

F IFODATA 
THE CSR IS CLEARED EXCEPT FOR THE IND.ADR.REG FIELD, 



* SUBORDINATE ROUTINES CALLED: ROLDMP 



WDPDR:: SAVE 



JSR 



{SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 {CALL REGISTER SAVE SUBRl . 



SET UP OUTER LOOP WHICH WRITES THE DATA PATTERN TO EACH LINE'S REGISTERS 



5 



CI R 



R! 



I CLEAR LINE COUNTER TO SELECT LINE 0. 



I THF OUTtR I OOP FOLLOWS. EACH PASS THROUGH THIS LOOP WRITES DATA TO All. 'Jf 
: THE DEVICE REGISTERS FOR A PARTICULAR 1 INE IF IT IS ACTIVE. 



2$: 



MOV 



R2»R4 



jSAVE THE OUTER I OOP DATA PATTERN. 



E.9 



C/DHWtfO DHU 11 ruNC 1ST PARTI 
GLOBAi SUBROUTINE 



MACRO M12C0 
- WDPDR - 
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SEQ 108 



4165 
4166 

4167 
4168 
4169 
4170 
4171 
4172 
4173 
4174 
4175 
4176 
4177 
4178 
4179 
4180 
4181 
4182 
4183 
4164 

4186 
4187 
4\88 

4189 

4190 

4191 

4192 

4193 

4194 

4195 

4196 

4197 

4198 

4199 

4200 

4201 

4202 

4203 

4204 

4205 

4206 

4207 

4208 

4209 

4210 

4?1 1 

4212 

4213 

4214 

4215 

4216 

4217 

4218 

4219 

4220 

4221 



023354 
023360 
023362 
023370 
023372 



023376 
023400 
023404 
023410 
023414 
023416 
023420 
023422 
023426 



023430 
0234 34 
023436 
023440 
023442 
023444 
023446 
023450 
023452 



023454 
023460 
023462 
023464 
023466 
023470 
0234 72 
0234 74 



023476 
023502 
023506 
023512 
023514 
023520 
023524 



023526 
023530 
023534 



010577 
006305 
03656 7 
001456 
012701 



010200 
046100 
016103 
005766 
003402 
005203 
000300 
005766 
001412 



005766 
100403 
001404 
150013 
000415 
140013 
000413 
1100 J 3 
000411 



005766 
100403 
001404 
050013 
000403 
040013 
000401 
010013 



004767 
062701 
020127 
001002 
062701 
020127 
003724 



010402 
004 76 7 
006205 



156662 

002410 156640 

000004 



002370 
002242 
000010 



000010 



000012 



000012 



175766 
000002 
000006 

000002 
000016 



MOV 
ASl. 
BIT 
BEQ 
MOV 



R5.SJCSRA 
R5 



BITT0LCR5),ACTLNS 



{SET CSR IND.AOR.REG FIELD TO THIS LINE 
{TURN LINE NUMBER INTO A WORD OFFSET. 



20$ 
0LPR0.R1 



4$ 



6$; 



THE INNER LOGP FOLLOWS, 

DEVICE REGISTER. 

MOV R2.R0 

BIC UNBTTBCRD.RO 

MOV DRADRT(R1).R3 

TST R3SL0T(SP^ 

BLE 6$ 

INC R3 

SWAB RO 

TST R3SLOTC5P) 
BEQ 12$ 



{LINE ACTIVE? NO, SKIP THIS LINE. 
{YES, INITIALIZE THE REGISTER OFFSET. 

EACH PASS THROUGH THIS LOOP WRITES DATA TO A 



8$t 
10$ 

12$ 

14$ 
16$ 

18$ 
19$ 



{PERFORM BYTE ACCESS TO THE 

R4SL0TCSP) 

8$ 

10$ 

R0.CR5) 

18$ 

R0.CR3) 

18$ 

R0.CR3) 

18$ 



TST 
BMI 
BEQ 

BISB 
BR 

BICB 
BR 

MOVB 
BR 



{CLEAR BIT FIELDS FOR UNUSED REGISTER BITS. 

{GET THE ADDRESS OF THE. DEVICE REGISTER. 

j CHECK THE OPtRAND TYPE INOICATOR. 

{HIGH BYTE? NO. SKIP HIGH BYTE ADDRESS SET 

{YES, SET THE REG ADDRESS TC THE HIGH BYTE. 

{MOVE HIGH BYTE DATA INTC XHE LOW BYTE. 

i CHECK THE OPERAND TYPE INDICATOR. 

{WORD ACCESS? YES. GO PERFORM WORD ACCESS. 

SPECIFIED BfTE OF THE SPECIFIED REGISTER. 

j NO, CHECK THE ACCESS TYPE INDICATOR. 
(USE BIC? YES, GO PERFORM BICB INSTRUCTION 
I USE MOV? YES, GO PERFORM MOVB INSTRUCTION 
{NEITHER. PERFORM BISB ACCESS TO REGISTER. 

{PERFORM HICB ACCESS TO REGISTER. 

{PERFORM MOVB ACCESS TO REGISTER. 



UP 



t 



{PERFORM WORD ACCESS TO THE SPECIFIED REGISTER. 



TST R4SL0TCSP) 

BMI 14$ 

BEQ 16$ 

BIS R0.CR3) 

BR 1^$ 

BIC R0.CR3) 

BR 18$ 

MOV R0.CR3) 

! PREPARE THE DATA PAT 

JSR PC.ROLDAP 

ADD 02 , R 1 

CMP Rl.^FSLSO 

BNE 19$ 

ADD 02, Rl 

CMP Rl.tfTXBFCO 

Bl. E 4 $ 



{CHECK THE 
{USE BIC? 
{USE MOV? 
{NEITHER. 



ACCESS TYPE INOICATOR. 
YES. GO PERFORM BIC INSTRUCTION. 
YES, GO PERFORM MOV INSTRUCTION. 
PERFORM BIS ACCESS TO REGISTER. 



{PERFORM BIC ACCESS TO REGISTER. 

{PERFORM MOV ACCFSS TO REGISTER. 

TERN AND OFFSET FOR THE NEXT REGISTER ON THIS LINE 

{ROTATE DATA PATTERN LEFT, NOT THROUGH CARRi 
{INCREMENT OFFSET FOR NEXT REGISTER. 
{CHECK IF THIS IS THE F IFOSI 7E/DATA REG 
{AVOID ALTERING THE OFFSET IF IT ISN'T. 
{AVOID TESTING THESE REGISTERS. 
•COMPARE REG OFFSET WITH OFFSET OF LAST REG. 
{LOOP IF NOT ALL REG DONE FOR THIS LINE. 



j BACK INTO THE OUTER LOOP. NOW SET DP FOR NEXT LINE. LOOP IF NOT DONE 



1/57 34 



20$: 



MOV 
JSR 
ASR 



R4.R2 

PC.ROLDAP 
R5 



{SET UP TO ROTATE THE DA1A PATTERN. 

, ROTATE THF DATA PATTERN. 

{CONVERT BACK TO LINE NUMBER FROM WORD OFFSET 



1-9 



C2DHUH0 DHU-11 f'UNC TST PARTI 
GLOBAL SUBROUTINE 



A^^^ 023535 005205 



4223 


023540 


02052 7 


4224 


023544 


002702 


4225 






4226 


023546 






023546 


004 736 


422 7 


023550 


000207 



MACRO M1200 
- WDPDR 
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000020 



60S; 



INC 
CMP 
Bl.T 

PASS 
RTS 



R5 

R5,#NUMLNS 

2$ 



PC 



JSR 



SEQ 109 



, COUNT THIS LINF. 
:C0MPARE LINE COUNT 
jLOOP IF SOME LINES 

{RESTORE GPRS. 

pc.acsp)* 



WITH NUMBER 
NOT DONE. 



or LINES. 



jRETURN TO PREG05 SUBRT 



G9 



CZDHUBO 
GLOBAL 



DHU-U FUNC 
SUBROUTINE 



TST PARTI 



MACRO Ml 200 
- WTWLNC 
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SEQ 110 



4229 
4230 
4231 
4232 
4233 
4234 
4 235 
4236 
4237 

4233 

4239 
4240 
424 1 
4242 
4243 
4244 
4245 
4246 
424 7 
4248 
4^49 
4250 
4251 
4252 

4253 
4254 

4255 
4256 
4257 
4258 
4259 
4260 
4261 
4262 
4263 
4264 
4265 

4266 



.SB Hi GLOBAL SUBROUTINE - WTWLNC - 

- LINE CONTROL REGISTER SETUP ROUTINE - 
THIS SUBROUTINE IS USED TO SET THE DEVICE UNDER TEST CDUT) LINE. 
CONTROL REGISTERS (LNCTRL) TO THE SPECIFIED STATE, ONLY THE LNCTRLS 
FOR THE SPECIFIED LINES ARE ALTERED. 

INPUTS: RO - NEW LINE PARAMETERS. 

R5 - BIT MAP OF LINES TO BE ALTERED. 

CSRA - CONTAINS ADDRESS OF THE OUT CSR. 

IESTAT - CONTAINS THE CURRENT STATE OF THE IX AND RX INTERRUPT 

ENABLE BITS IN THE CSR. 
l.NCTRA - CONTAINS ADDRESS OF THE DUT LNCTRL REGISTERS. 

OUTPUTS: LNCTRL - SPECIFIED DUT LINE CONTROL REGISTERS ARE ALTERED. 

CALLING SEQUENCE: JSR PC, WTWLNC 

COMMENTS: 

SUBORDINATE ROUTINES CALLED: ALTFLD. 

. * + *******«■.**** + ****** + ******** + ****♦ + + ************ + + *******♦ + *#* + ** + + **• + ** 



023552 
023552 



023556 
023562 
023564 
023566 



004567 160220 



016701 156470 

010002 

010503 

012704 177777 



WTWLNC: : SAVE 



JSR 



{SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 {CALL REGISTER SAVE SUBRT. 



MOV 


LNCTRA.R1 


MOV 


R0.R2 


MOV 


R5.R3 


MOV 


0-1. R4 



023572 004767 173656 



023576 
023576 
023600 



004736 
000207 



SET UP THE PARAMETERS FOR THE CALL TO ALTFLD, 

j SET UP THE REGISTER ADDRESS PARAMETER. 
{SET UP THE DESIRED REGISTER CONTENTS. 
jSET UP THE BIT MAP OF LINES TO ALTER. 
{SELECT ALL REGISTER BITS TO BE ALTERED. 

CALL THE SUBROUTINE WHICH ALTERS THE REGISTER CONTENTS. 

JSR PC. ALTFLD {ALTER THE REGISTER CONTENTS. 

60$: PASS 

RTS PC 



JSR 



{RESTORE GPRS. 
PC.SK SP)» 



{RETURN TO PREG05 SUBRT 



hR 



CZDHU80 DHU-11 H'NC 1ST PARTI 
GLOBAi SUBROUTINE 

4263 
426° 
42*0 
4271 
4272 
4273 
4.? 74 

4,? 75 
4^76 

42-7 

4278 
4279 

4280 
4281 
4282 
4283 
4284 
4285 
4286 
4287 
4288 
4289 
4290 
4291 

4292 

4293 
4294 
4295 

".296 
4297 
4298 
4299 
4 300 
4301 
4302 
4303 
4 304 

4305 



MACRO M1200 
- WTWLPR - 
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SEC) 111 



023602 
023602 



023606 
023612 
023614 
023616 



004567 160170 



016701 156434 

010002 

010503 

012704 177777 



023622 004767 17^626 



023626 
023626 
023630 



004 7 36 
000207 



.SBTTL GLOBAL SUBROUTINE - WTWLPR - 

f + ***+ + + + + + + + + *** + .»************************************************** ******* 

- LINE PARAMETER REGISTER SETUP ROUTINE - 
THIS SUBROUTINE IS USED TO SET THE DEVICE UNDER TEST (DUT) LINE 
PARAMETER REGISTERS (LPR) TO THE SPECIFIED STATE, ONLY THE LPRS FOR 
THE SPECIFIED LINES ARE ALTERED. 



INPUTS; 



RO - NEW LINE PARAMETERS. 

R5 • 3IT MAP OF LINES TO BE ALTERED. 

CSRA - CONTAINS ADDRESS OF THE OUT CSR. 

IESTAT - CONTAINS THE CURRENT STATE OF THE TX AND RX INTERRUPT 

ENABLE BITS IN THE CSR. 
LPRA - CONTAINS ADDRESS OF THE DUT LPR. 



OUTPUTS 



LPR 



CALLING SEQUENCE: 

COMMENTS: 



SPECIFIED DUT LINE PARAMTER REGISTERS ARE ALTERED. 
JSR PC, WTWLPR 



SUBORDINATE ROUTINES CALLED: ALTFLD. 
I . - «********************* + ****** + *** + *** + **********♦**** + ********************* 



WTWLPR: : SAVE 



JSR 



:SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 {CALL REGISTER SAVE SUBRT. 



MOV 


LPRA.R1 


MOV 


R0,R2 


MOV 


R5.R3 


MOV 


0-1, R4 



SET UP THE PARAMETERS FOR THE CALL TO ALTFLD. 

{SET UP THE REGISTER ADDRESS PARAMETER. 
j SET UP THE DESIRED REGISTER CONTENTS, 
{SET UP THE BIT MAP 01 LINES TO ALTER. 
(SELECT ALL REGISTER BITS TO BE ALTERED. 

CALL THE SUBROUTINE WHICH ALTEMS THE REGISTER CONTENTS. 

JSR PC, ALTFLD {ALTER THE REGISTER CONTENTS. 

60*1 PASS 

RTS PC 



JSR 



{RESTORE GPRS. 

pc.acsp)* 



{RETURN TO PREG05 SUBRT 



19 



C/DHUHO DHL 11 mNC T bT PARTI 
INTERRUP 1 SERVICE ROUTINE 

4 $Q 7 

4 508 

4510 
4511 
4 51." 
4 515 
4 514 
4? IS 
4M* 
451 ' 
4518 
451^ 
4 320 
4 52 1 

4 32r. 

4 323 
4524 
4 325 
4326 



MACRO M1200 
- CACHRX • 
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•EQ 112 



4528 

4329 

4550 
4551 
4552 
4553 
4 334 

4335 



025652 
023652 
025656 
023642 
023644 
023646 
023650 
023654 
023654 
023656 



004567 

016701 
005201 
102001 
005301 
010167 

004 7 36 
000002 



160140 
156452 



156440 



. SBTTl INTERRUPT SERVICE ROUTINE • CACHRX - 

CATCH RECEIVER INTERRUPT. 

THIS ROUTINE 13 USED IN SEVERAL TESTS, TO LOG A COUNT OF* THE 
NUMBER OF RECEIVER INTERUPTS THAT OCCUR. 

INPUTS; CSRA - CONTAINS THE ADDRESS OF THE CSR. 

RXINTC - HOLDS THE COUNT OF THE NUMBER OF RX INTERRUPTS 
THAT OCCURRED. 

OUTPUTS: RXINTC - CONTAINS THE UPDATED INTERRUPT COUNT. 



CALLING SEQUENCE; 



COMMENTS: 



PUT THE ADDRESS OF THE LABEL CACHRX IN THE VECTOR 
LOCATION. 



SUBORDINATE ROUTINES CALLED: NONE 



CACHRX: 'SAVE 







JSR 




MOV 


RXINTC. Rl 




INC 


Rl 




BVC 


2) 




DEC 


Rl 


2$: 


MOV 


Rl, RXINTC 


60$: 


PASS 





RTI 



JSR 



j SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREGG5 ;CALL REGISTER SAVE SUBRT. 

GET THE RECEIVER INTERRUPT COUNT 

INCREMENT THE COUNT 

BRANCH IF NO OVERFLOW OCCURRED 

RESET THE COUNT TO 17777? 

SAVE NEW COUNT VALUE 

RESTORE GPRS. 
PC.3CSP)* jRETURN TO PREG05 SUBRT 



J 9 



C/DHU60 OHU II K'NC 1ST PARTI 
INTERRUPT SERVICE ROUTINE 



4 53 7 
4 338 
4339 
4 340 
4 34 1 
4 34? 
4343 
4 344 
4 34 5 
4546 
4 34 7 
4348 
4349 
4350 
4 351 
435? 
4353 
4354 
4355 
4 356 
4357 
4 358 



MACRO M1200 15-MAR-84 09:15 PAGE 87 
- CACHTX 

.SBTTL. INTERRUPT SERVICE ROUTINE - CACHTX - 

- CATCH TRANSMITER INTERRUPT. 

THIS ROUTINE IS USED IN SEVERAL TESTS. TO LOG A COUNT OF THE 

NUMBER OF TRANSMISSION INTERRUPTS THAT OCCUR. 

INPUTS; CSRA - CONTAINS THE ADDRESS OF TVH CSR. 

TXINTC - HOLDS THE COUNT OF THE NUMBER OF TX INTERRUPTS 
THAT OCCURRED. 

OUTPUTS: TXINTC - CONTAINS THE UPDATED INTERRUPT COUNT. 



^EQ 113 



CALLING SEQUENCE: 



COMMENTS: 



PUT THE ADDRESS OF THE LABEL CACHTX IN THE VECTOR 

LOCATION. 



SUBORDINATE ROUTINES CALLED: NONE 
♦♦♦A*********************************************************************** 



4359 
4360 
4361 
4362 
4363 
4364 

4365 



023660 
023660 
023664 
023670 
023672 
023674 
023676 
02 5 702 
023702 
023704 



CACHTX: :SAVE 



00456 7 
016701 
005201 
102001 
005301 
010167 

004 736 
000002 



16011? 
156436 



156424 







JSR 




MOV 


TXINTC, Rl 




INC 


Rl 




BVC 


2$ 




DEC 


Rl 


2$: 


MOV 


Rl, TXINTC 


60$; 


PASS 





RTI 



JSR 



;SAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 {CALL REGISTER SmVE SU8RT . 

;GET THE TRANSMISSION INTERRUPT COUNT 

{INCREMENT THE COUNT 

{BRANCH IF NO OVERFLOW OCCURRED 

{RESET THE COUNT TO 177777 

{SAVE NEW COUNT VALUE 

{RESTORE GPRS, 

PC.a(SP)* iRETURN TO PREG05 SUBRT 



CZDHUBO DHU-ll f'UNC 1ST PARTl 
INTERRUPT SERVICE ROUTINE 



MACRO M120O 
- CLKINT - 



|<9 
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SEQ 114 



4367 








4368 








4369 








4 3 70 








4371 








4372 








4 373 








4 374 








4375 








4376 








4377 








4378 








43 70 








4 360 








4381 








4382 








4383 








4384 








4 385 








4336 








4397 








4 338 








4389 








4390 


O23>06 


005 767 


156432 


4391 


023712 


001402 




4 39? 


023714 


005367 


156424 


4393 


023720 


005767 


156422 


4394 


023724 


001402 




4395 


023726 


005367 


156414 


4 396 


023732 


005367 


156412 


4397 


023736 


001006 




4 398 


023 740 


016767 


156406 


4399 


023746 


010046 




4400 


023750 








023750 


104422 




4401 


023752 


012600 




4402 


023754 


000002 





SBTTL INTERRUPT SERVICE ROUTINE - CLKINT - 

4*****4***********^********** + ***^ **** + * + -;. + + ■* + ** + ** + * *+** + +* + + + + + + + + ***** + * 

THIS ROUTINE IS EXECUTED CLKHRZ TIMES Pt£R SECOND. IT DECREMENTS THE 
TWO TIMER COUNTERS DOWN TO ZERO. 



INPUTS; 



OUTPUTS: 



TIMER1 - TIMER COUNTER M. 
TIMER2 - TIMER COUNTER 02. 
TIMER3 - TIMER COUNTER FOR CALL 



Of* BREAK MACRO 



THE 2 TIMER COUNTERS ARE DECREMENTED IF THEY ARE NOT ZERO, 



CALLING SEQUENCE: 



PUT ♦CLKINT IN THE CLOCK INTERRUPT VECTOR SLOT, 
PUT THE DESIRED TIME PERIOD (SECONDS TIMES CLKHRZ) IN 
EITHER TIMER1 OR TIMER2 AND POLL THE RESPECTIVE TIMER 
COUNTER TO DETECT ITS GOING TO ON TIME-OUT. 



COMMENTS: THE 2 COUNTERS WILL NOT WRAPAROUND BUI WILL STOP AT 0. THIS 

ALLOWS THE DETECTION C 7 A TIME-OUT ANY TIME AFTER THE TIME-OUT 
HAS OCCURRED UNTIL THE TIMER COUNTER IS SET TO ANOTHER VALUE. 

SUBORDINATE ROUTINES CALLED: NONE, 

- - ****** ******4^*^******M*********4^+* *************** ******************* C + + ** 



CLKINT: 



2$ 



4$ 



156402 



60$: 



TST 
BEQ 

DEC 
TST 
BEQ 
DEC 
DEC 
BNC 
MOV 
MOV 
BREAK 

MOV 
RT1 



TIMER1 

2$ 

TIMER1 

TIMER2 

4$ 

TIMER2 

TIMER3 

60$ 

BCOUNT 



TIMER3 



CHECK FOR 
BRANCH TO 
DECREMENT 
CHECK FOR 
BRANCH TO 
DECREMENT 
DECREMENT 
EXIT IF NOT 
SET UP TIME 



TIMER1 AT ZERO. 

LEAVE IT AT ZERO 

TIME COUNT. 

TIMER2 AT ZERO. 

LEAVE IT ALONE IF 

TIME COUNT. 

THE BREAK COUNT. 

TIME TO CALL BREAK 
TILL NEXT BREAK. 



IF IT IS ZERO. 



IT'S ALREADY ZERO 



R0.-C5P) 



(SP)*,RO 



;SAVE CONTENTS OF RO EROM BREAK MACRO 
jCHECK FOR OPERATOR CONTRQL/C. 

TRAP 
{RESTORE CONTENTS OF RO* 



C*BRK 



C/DHUBO 
INTERUPT 


DHU 11 \ UNC I SI 
SERVICE ROUTINE 


PARTI 


4404 








440b 








4406 








4407 








4408 








4409 








4410 








44U 








4413 








4413 








4414 








441b 








4416 








441? 








4418 








4419 








4420 








4421 








442c? 








4423 








4424 








4425 








4426 








442 7 








4426 








4429 








4430 


023756 








023756 


004567 


160014 


4431 


023762 


017700 


156256 


4432 


023766 


016701 


156322 


4433 


023772 


005201 




4434 


023774 


001402 




4435 


023776 


010167 


156312 


44 36 


024002 


016701 


156310 


4437 


024006 


052701 


000001 


4438 


024012 


032767 


000001 


4439 


024020 


001402 




4440 


024022 


052701 


040000 


4441 


024026 


010167 


156264 


"442 


024032 








024032 


004 736 




4443 


024034 


000002 





MACRO M1200 
- RXBRRT - 
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L9 

PAGE 89 



SEQ 115 



156310 



.SBTTl. INTERUPT SERVICE ROUTINE 



- RXBRRT - 



* * 
+ 

+ 
+ 

* 

* 
* 
+ 

* 

!* 

5* 
; * 

;* 

2* 

;* 
;♦ 
;* 
j + 

;* 
? + 

: ♦ 



****************»**************************** + ********** + *.# + *#** + * + ***** + +* 
- BR LEVEL TEST RECEIVE INTERRUPT SERVICE ROUTINE ■■ 

THIS SERVICE ROUTINE HANDLES RECEIVE INTERRUPTS DURING THE INTERRUPT 
BR LEVEL TEST, THIS ROUTINE COUNTS THE INTERRUPT AND SETS A FLAG 
TO INDICATE THAT THE INTERRUPT HAS OCCURRED. IT ALSO CHECKS THE 
FLAG WHICH INDICATES THAT A TX INTERRUPT HAS OCCURRED. IF THE TX 
INTERRUPT FLAG IS SET, THIS ROUTINE SETS AN INTERRUPT ORDER ERROR 
FLAG INDICATING THAT A TRANSMIT INTERRUPT WAS SERVICED BEFORE A 
SIMULTANEOUS RECEIVE INTERRUPT. 

INPUTS: RXINTC - HOLDS THE COUNT OF THE NUMBER OF RX INTERUPTS. 
RXINTF* - RX INTERRUPT FLAGS. 

OUTPUTS? RXINTC - CONTAINS THE UPDATED INTERUPT COUNT. 
RXINTF - RX INT FLAGS: 

CBIT SET, BIT 14 SET IF TXINTF BIT IS SET.) 



CALLING SEQUENCE: 



PUT THE ADDRESS OF THE LABEL RXBRRT IN THE VECTOR 
LOCATION. 



COMMENTS: NOTE: THE FIFO IS NOT PURGED BY THIS ROUTINE. 

SUBORDINATE ROUTINES CALLED: NONE. 
- ********** 



RXBRRT:; SAVE 



RT1 



*******************************************»**#**♦*** + •»*.* + ****** + 

jSAVF. CONTENTS 01 GPRS RO THRU R5. 

R5.PREG05 iCAL!. REGISTER SAVE SUBRT. 

jRt.AD THE CHAR OUT OF THE FIFO. 

iGl.r THE INTERUPT COUNT. 

? INCREMENT THE COUNT. 

jBYPASS UPDATING COUNT IF OVERFLOW OCCURRED, 

SAVE NEW COUNT VALUE. 

GET THE RX INTERRUPT FLAGS. 

SET THE RX INTERRUPT HAS OCCURRED FLAG, 

TEST THE "TX INT HAS OCCURRED" FLAG. 

SKIP SETTING ERROR FLAG If NO TX INT. 
iSET THE INTERRUPT ORDER ERROR FLAG. 
jUPDATE THE RX INTERRUPT FLAGS. 
{RESTORE GPRS, 
PC»fi)(SP)* jRETURN TO PREG05 SUBRT 







JSR 




MOV 


aRBUTA.RO 




MOV 


RXINTC. Rl 




INC 


Rl 




BEQ 


?.i 




MOV 


Rl, RXINTC 


2$: 


MOV 


RXINTF, Rl 




BIS 


0BIT0.R1 




BIT 


#BITO, TXINTF 




BEQ 


4t 




BIS 


*>BTT14,R1 


4?: 


MOV 


Rl, RXINTF 


60$; 


PASS 





JSR 



CZDHU80 OHU-11 FUNC 1ST PARTI 
INTERUPT SERVICE ROUTINE 



4445 
4446 

444 7 
•>448 
4449 
4450 
4451 
4452 
4453 
4454 
4455 
4456 
4457 
4456 
4459 
4460 
4461 
4462 
4463 
4464 

4465 
4 166 
4467 
4466 
4469 
44 70 
4471 
4472 
4473 
4474 
4475 



MACRO M1200 
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SEG 116 



4476 
44 77 

4178 
4479 
4480 
4481 
4482 
4483 
4484 
4485 
4486 
4487 
4488 
4489 

4490 



024036 
021036 
024042 
024046 
024052 
024054 
024062 
024066 
024070 
024072 
024076 
024102 
024106 
024112 
024114 
024120 
02^120 

024X22 



004567 
017701 
032701 
001003 
052767 
016701 
005201 
001402 
010167 
016702 
017722 
020267 
103002 
010267 

004 736 
OOOOOH 



, SBTTL INTERUPT SERVICE ROUTINE - RXINPT - 

* - RECEIVE CHARACTER INPUT INTERRUPT SERVICE ROUTINE •• 

* THIS SERVICE ROUTINE INPUTS A CHARACTER FROM THE OUT AND LOADS THE 

* CHAR (COMPLETE WITH STATUS FLAGS) INTO A RECEIVE CHAR BUFFER IN 

* MEMORY, THE INTERRUPT IS ALSO COUNTED. THE RECEIVE CHAR BUFFER IS 
+ MONITORED TO ENSURE THAT IT DOES NOT OVERFLOW. 

BUFENO - LAPELS THE END OF THE HOST MEMORY BUFFER. 
BUFPTR - CONTAINS ADDRESS OF NEXT FREE BUFFER LOCATION. 
CSRA - CONTAINS THE ADDRESS OF THE DUT CSR. 
RBUFA - CONTAINS THE ADDRESS OF THE RBUF DUT REGISTER. 

HOLDS THE COUNT OF THE NUMBER OF RX INTERUPTS. 

RX INTERRUPT FLAG?. 



RXINTC 
RXINTF 



BUFPTR 
RXINTC 
RXINTF 



* INPUTS: 

* 
* 
+ 

* 

* OUTPUTS: 

4 
4 
4 

* CALLING SEQUENCE: 
4 
+ 

* COMMENTS: 

4 
4 
4 

4 

* SUBORDINATE ROUTINES CALLED: NONE. 

- - 44444444444 44 4* 4444 44 + 44444*4*444*4444444444>i 4 4444444*444444444 44 44444 m 4 + 4 + 



CONTAINS UPDATED ADDRESS OF NEXT FREE BUFFER LOCATION. 

CONTAINS THE UPDATED INTERUPT COUNT. 

RX INT FLAGS (BIT 15 SET IF RX .DATA. AVAIL IS CLEAR). 

PUT THE ADDRESS OF THE LABEL RXINPT IN THE VECTOR 
LOCATION. 



IN CASE OF OVERFLOW OF THE MEMORY BUFFER, BUFPTR WILL BE 
MAINTAINED EQUAL TO BUFENO ANO THE WORD AT BURFPTR WILL 3E 
THE LAST WORD READ FROM THE DUT FIFO. 
NOTE: THIS ROUTINE CAN DESTROY TX. ACTIONS BY READING THE CSR. 



157734 
156174 
000200 

100000 
156226 



156216 
156200 
156136 
157614 

156162 



156234 



RXINPT:: SAVE 

MOV 

BIT 

BNE 

BIS 

2*: MOV 

INC 

BEQ 

MOV 

4$: MOV 

MOV 

CMP 

DHIS 

MOV 

60$: PASS 

RTI 



JSR 
aCSRA.Rl 
0BIT7.R1 

2$ 

0BIT15, RXINTF 

RXINTC, Rl 

Rl 
4$ 

Rl, RXINTC 

BUFPTR, R2 

aRBUFA,(R2)» 

R2, BUFENO 

60$ 

R2, BUFPTR 

JSR 



jSAVE CONTENTS OF GPRS RO THRU R5 . 
R5.PREG05 jCALL REGISTER SAVE SU6RT. 
jREAD THE CONTENTS OF THE CSR. 
jTEST RX. DATA. AVAIL BIT. 

BRANCH AROUND SETTING FLAG IF BIT IS SET. 

SET THE RX. DATA. AVAIL CLEAR FLAG. 

GET THE INTERUPT COUNT. 

INCPEMENT THE COUNT. 
{BYPASS UPDATING COUNT IF OVERFLOW OCCURRED. 

SAVE NEW COUNT VALUE. 

GET THE POINTER TO NEXT FREE BUFFER WORD. 

READ A CHAR FROM THE FIFO INTO BUFFER. 

TEST FOR POINTER BEYOND END O c ' BUFFER. 

SKIP THE PfR UPDATE IF PTR OUT OF BOUNDS. 

UPDATE THE BUFFER POINTER. 

RESTORE (JPRS, 
PC.SKSP)* jRETURN TO PREGQS SUBRT, 



N9 



CZDhUtlO DHU-11 UJNC 1ST I'ARTl 
GLOBAL TRAP SERVICE ROUTINE 



4492 
4493 
4494 
4495 
449A 
449? 
4498 
4499 
4500 
4501 
450? 
4505 
4504 
4505 
4506 
450 ' 

450a 

4509 
4510 
4511 
4512 
451? 
4514 
4515 

4 51 6 024124 

4517 024130 
4516 024132 

4519 024136 

4520 024144 
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- TP4RTN - 

.SBTTL GLOBAL TRAP SERVICE ROUTINE 



SEQ 11 V 



TP4RTN - 



***** + *** + * + **** + + + ** + *** + ** + **** + ** + ** + ******* + + +)'** + + ** + + **** + ** + ** + + + + + ** + 
BUS TIME-OUT TRAP (004 TRAP) SERVICE ROUTINE - 
THIS ROUTINE DETERMINES IE THE 004 TRAP WAS CAUSED BY 
AN "EXPECTED" ERROR OR NOT BY EXAMINING THE RETURN PC VALUr ON THE 
STACK. IF THE TRAP IS UNEXPECTED. THIS ROUTINE JuMPS TO THE NORMAL 
DIAGNOSTIC SUPERVISOR 004 TRAP HANDLING ROUTINE. 



INPUTS: 



SP - POINTS TO THE PC WHERE THE TRAP OCCURED. 

AORP T R - LABEL AT THE ADDRESS WHERE "EXPECTED" TRAPS OCCUR, 

TP4R G - 004 TRAP FLAGS. 



OUTPUTS: TP4FLG - BIT 15 IS SET IF "EXPECTED" TRAP OCCURED. 
CALLING SEQUENCE: 



COMMENTS: 



PUT ADDRESS POINTED TO BY TP4RTN IN 004 VECTOR. 
OCCURENCE OF 004 TRAP VECTORS TO THIS ROUTINE. 

ANY 004 TRAP WHICH OCCURS AT AN ADDRESS OTHER THAN THAT LABELED 
ADRPTR WILL BE HANDLED BY THE NORMAL 004 TRAP SERVICE ROUTINE. 



SUBORDINATE ROUTINES CALLED: NONE. 



02162/ 
001402 
0001/7 
0527*7 
000002 



017764 

1561M 
100000 



TP4RTN;: CMP 

BEQ 
JHP 



1561.54 2$: 



6VS 
RTI 



(SP).OADRPTR 

2$ 

3TP4VEC 

frBIT15,TP4FLG 



;COMPARE EXPECTED ACR AGAINST TRAP RET PC. 

;IF THEY MATCH, CONTINUE. THIS ROUTINE. 

ilF NOT, JUMP TO NORMAL 004 TRAP SERVICE RJN. 

;SET THE 004 TRAP OCCURED FLAG. 

,-ALL DONE, GO BACK TO THE TEST, 



B 1 



CrDHUHO OW 11 * UNC IM PARTI 
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MACRO Ml 200 
TXINTR 



15 MAR 84 09} 15 PAGE 9,? 



SEQ 118 



4522 








4525 








4524 








4525 








452t> 








4 V ' 








4528 








4529 








4550 








4551 








4552 








4 5<5 








4 5 54 








4555 








45*t, 








455* 








4 558 








45V-* 








4540 








4541 








4542 








4545 








4544 








4545 








4M6 


024146 








024146 


00456; 


157624 


454; 


024152 


016701 


156150 


4548 


024156 


005201 




4549 


024160 


102001 




4550 


024 162 


005 301 




4551 


024164 


01016/ 


156156 


4 552 


024170 


016705 


156154 


4555 


024 174 


017 702 


15604 2 


4554 


02*200 


100402 




4555 


024 202 


052 703 


100000 


4 556 


024206 


052/0? 


000001 


455 7 


024212 


010V>7 


1561 U 3 


455A 


C242U- 








024216 


004 7 56 




4559 


024220 


000002 





SBTTL 
* * ♦ ♦ 



INTERUPT SERVICE ROUTINE 



TXINTR 



TRANSMIT INTERRUPT SERVICE ROUTINE - 
THIS ROUTINE HANDLES A TRANSMIT INTERRUPT FROM THE DEVICE UNDER TEST 
(DUT) BT COUNTING THE INTERRUPT ANO READING THE OUT CSR TO CLEAR THE 
INTERRUPT REQUEST, THIS ROUTINE ALSO SETS A FLAG TO INOICATE THAT 
A TX INTERRUPT HAS OCCUPRED ANO SETS A FLAG IF THE TX, ACTION BIT IS 
NOT SET IN THE READ CONTENTS OF THE DUT CSR. 



INPUTS! 



CSRA • CONTAINS THE ADORESS OF THE CSR. 
TXINTC HOLDS THE COUNT OF THE NUMBER OF 
TXINTF - TX INTERRUPT FLAGS. 



TX INTERUPTS 



TXINTC 
TXINTF 



OUTPUTS: 

CALLING SEQUENCE: 

COMMENTS? 



CONTAINS THE UPDATED TX INTERUPT COUNT. 

TX INT FLAGS (8IT SET, BIT 15 SET IF TX. ACTION CLR). 

PUT THE ADDRESS OF THE LABEL TXINTR IN THE VfcCTOR 
LOCATION. 



SUBORDINATE ROUTINES CALLED: NONE 



TXINTR: : SAVE 



MOV 
INC 
BVC 

DEC 
MOV 
MOV 
MOV 
BMI 
BIS 
BIS 
MOV 



2$: 

4» : 

60? 1 



PAS' 

an 



JSR 
TXINTC, Ri 
Rl 
21 

Rl 

Rl.TXINTC 
TXINTF ,R5 
SCSRA.R2 
41 

OBIT15,R5 
•eiTO.RS 
R3, TXINTF 

JSR 



iSAVE CONTENTS Of GPRS RO THRU R5. 

R5.PREG05 jCALL REGISTER SAVE 

jGET THE TX INTERUPT COUNT, 

l INCREMENT THE COUNT. 

»BRANCH IF NO OVERFLOW OCCURRED. 

jRESEY THE COUNT TO \ ? ?? t ' , 

iSAVE NEW COUNT VALUt . 

iGET THE TX INTERRUPT FLAGS. 

jREAD THE CSR. 



SUHRT 



j SKIP St 

|SC T TMt 
j SET THE 
I UPDATE 
I RES TQRl 
PC.iiKSfO 



TTING OF HAG V TX. ACTION IS SET, 

TX.ACI ION Ctt AR it AG. 

Tx INT MAS OCCl'RRf l I At',, 
THE T* INTERRUPT H 'U.S. 

GPRS, 
. {RETURN TO PRtGOb $VUM 



fMW l W R <ttd:%uMf 



45h« 
45** 

4s:o 

45. 'I 
4VV 

45.* J 

45 M 

45 '.'5 

4 5.* 6 

4S7? 0^\\? 
0^4.\V 
4S:6 
45 ^ CV4.W 

0<?4<?<?4 

4S*0 

4531 

4 58c 

4563 0J4 t V* 
0,'4 t Vf> 
024££6 



ooow» * 

000000 



CIO 

PARTI MACjjp ^l'00 15 MAR 84 09:15 PAtiF 9* 

.SRTTl RFPORT CODINCi SECTION 

1 * ♦ 

I iHfc RtPORT CODING SECTION CONTAINS THE 

i •'PRINTS' 1 CAILS THAT GENERATE STATISTICAL REPORTS 

l - - 

HGNRPT 

i at RPT 

A VFN 
EN0RP1 



I $RPT: s 



.WORD 
.WORD 



1044^5 



LlOOK; 



5£U 11'* 



JUMP 
t 1001 7 -c? 



TRAP C*RPT 



^8mRK u fWd UNC ,ST PARU 



DIG 
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n »EO 120 



4S85 
4S<»* 

4 w". 

4S^ 
459/ 
4'j^ 
4S*>9 

4600 

4601 
460<. J 
4605 

4604 
4^0 r » 
4600 

4607 



.SBTTL PROTECTION TABLE 



<V4,?50 
024 t >30 

0.24*30 

0^4 f ? 54 

054256 



1 THIS TABLE 
{ TO PROTECT 
I * - 



l / / ? ' ? 
l :?:?? 

177777 



IS USED BY THE RUNTIME SERVICES 
THE LOAD MEDIA. 



BGNPROT 



1 

-1 

1 

ENDPROT 



I $PROT 



I OFFSET 
I Of C SET 
l OFFSET 



INTO 
INTO 
INTO 



P- TABLE 
P TABLE 
P- TABLE 



ADDRESS 



FOR CSR 

FOR MASSRUS ADDRESS 

FOR DRIVE NUMBER 



c/dhubo 


DHU-11 FUNC TST 


PARTI 


PROTECTION TABLE 




4b29 








4630 








4631 








4b32 








4633 








4634 








4635 








4636 








463" 








4638 








4639 








4640 








4641 








4642 








4643 


024236 
024236 






4644 








4645 


C24236 








024236 


012/00 


000040 




024242 


104447 




4646 


024244 








024244 


103416 




464 7 








4648 


024246 








024246 


012700 


000037 




024252 


10444 7 




4649 


024254 








024254 


103556 




4650 








4651 


024256 








024256 


012700 


000035 




024262 


104447 




4652 


024264 








024264 


103555 




4653 








4654 


024266 








024266 


012700 


000036 




024272 


104447 




4655 


024274 








024274 


103161 




4656 


024276 


000167 


000540 


4657 


024 302 






4658 


024302 








024302 


104433 




4659 








4660 








4661 








4662 


024304 








024 304 


012700 


000114 




024310 


104462 






024312 


010001 




4663 


024314 


012167 


156014 


4664 


024320 


012167 


156012 


4665 


024324 


012167 


156010 


4666 


024330 


012167 


156006 


466/ 


024334 


026727 


136002 


466^ 


024542 


001004 
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SEQ 121 



.SBTTL. INITIALIZE SECTION 
I ♦ * 

I* THIS SECTION CONTAINS THE CODE WHICH IS PERFORMED AT THE BEGINNING OF 
{ * EACH PASS OR AFTER A CONTINUE COMMAND. 
;♦ THIS CODE PERFORMS THE FOLLOWING ACTIONS; 

J* 

i* MOVES THE INFORMATION HELD IN THF. HARDWARE P- TABLE INTO THE GLOBAL 

{ * DATA AREA. 

;* 

; +* + **. \ + * ****** * + t + tt + t*4,** + l** + + ****** + + ** + + ** + *** + ** + + *********.+ *. + * + *** ****** 

BGNINIT 

L$INIT: : 
j SEE IF PROGRAM JUST STARTED , BR IF YES 
READEF ^EF. START 



BCONPLETE 



NEWSTA 



jSEE IF PROGRAM JUST RESTARTED, BR IF YES 
READEF OEF .RESTART 



BCOMPLETE 



NEWRES 



;SEE IF THIS IS A NEW PASS, BR IF YES 
REAOEF GEF.NEW 



BCOMPLETE 



NEWPAS 



iSEE IF PROGRAM WAS JUST CONTINUED 
READEF frEF. CONTINUE 



NEWSTA: 



I * 



BNCOMPLETE 
JMP END IT 
BRESET 



GETPRM 



MOV *EF,START,RO 
TRAP CSRFFG 

BCS NEWSTA 



MCV •EF. RESTART.RO 
TRAP C$REFG 

BCS NEWRES 



MOV SEF.NEW.RO 

TRAP CJREFG 

BCS NEWPAS 



MOV oef.continue.ro 

TRAP C$REFG 
BCC GETPRM 



;RESET THE BUS TO PREVENT ILLEGAL INTERRUPTS. 



TRAP 



i SET UP FOR LINF TIME CLOCK INTERRUPTS. 

CLOCK L.R1 {GET TH£ CLOCK PARAMETERS. 



000062 



MOV 


CR1)*.CLKCSR 


MOV 


CR1 )».CLKBRL 


MOV 


(R1)»,CLKVEC 


MOV 


CR1 )..CLKHRZ 


CMP 


CL KHRZ , #50 . 


BN£ 


2* 



MOV 
TRAP 
MOV 
j STORE CLOCK CSR ADDRESS. 
iSTORE CLOCK BUS REQ INT LEVEL 
I STORE CLOCK INTERRUPT VECTOR, 
j STORE CLOCK FREQUtNO . 
it* ST FOR bOHZ LINE FREQUENCE 
j BRANCH XF CLOCK IS NOT 50H<.\ 



CiRESET 



C'L.RO 
CJCLCK 
R0 # R1 



ssm^iTsaF 



TST PARTI MACRC M1200 15-MAR84 09; IS 



4669 

4670 
4671 
4672 



467J 
4674 
4675 
4676 



024344 
024352 
024354 
024362 
024362 
024366 
024372 
024376 
024402 
024404 
024410 
024414 
024416 
024422 
024422 
024426 



012767 
000403 
012767 

012746 
012746 
016746 
012746 
104437 
062706 
016700 
006300 
010067 

012700 
104441 



4677 

4673 

4679 

4680 

4681 

4682 

4683 

4684 

4685 

4686 

4687 

4668 

4689 

4690 

4691 

4692 

4693 

4694 

4695 

4696 

4697 

4698 

4699 

4 700 

4701 

4 702 

4 703 

4704 

4 705 

4706 

4707 

4 708 

4709 

4710 

4711 

4712 

4713 

4714 

4715 

4716 

4717 



0244 30 
0244 36 



024444 
024450 
024456 
024462 
024466 
024472 
024500 
024502 
024506 



016767 
012767 



005067 
012767 
012700 
016701 
004 767 
016767 
103403 
005067 
000402 



F10 
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SEQ 122 



000024 

000021 

000300 
023706 
155742 
000003 

000010 
155726 

155730 

000240 



153350 
024124 



155650 
000100 
002332 
155646 
173260 
155624 

155634 



024510 004767 173G12 



024514 
024522 
024530 
024534 
024540 
024544 
024550 
024554 
024560 
024564 
024572 
024574 
024602 
024t,Q6 



016767 
012767 
005067 
005067 
012700 
016701 
005067 
005067 
004 76 7 
016767 
103003 
012767 
00506 7 
000167 



153264 
024124 
155564 
155572 
002332 
155610 
155606 
155604 
173166 
155532 

000001 
155504 
000006 



156002 
155772 



2$ 
4$ 



MOV 020. ,MSTICi< 

3R 4$ 

MOV 017..MSTICK 

SETVEC CLKVF.C , OCLKINT , 0PRIO6 



j INDICATE 20MS PER CLOCK TICK. 

{INDICATE 17 MS PER CLOCK TICK, 

j INITIALIZE CLOCK INTERRUPT VECTOR. 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 

{INITIALIZE THE BREAK COUNT 

{ TO CAUSE A BREAK 

I EVERY 2 SECONDS. 

{ALLOW CLOCK INTERRUPTS DISABLE OTHERS. 

MOV 0PRI05,R0 
TRAP C*SPRI 

1 ENABLE THE LINE TIME CLOCK CLTC) CHECKING 10 MAKE SURE THAT THE CSR 

* IS ACCFSSABLE. 

I FIRST SET UP TO CATCH ANY 004 TRAPS WHICH OCCUR: 



0PRI06.-CSP) 
*CLKINT, -CSP'J 
CLKVEC-CSP) 
*3, CSP) 

C$SVEC 

no, SP 



MOV 


CLKHRZ.RO 


ASL 


RO 


MOV 


RO.BCOUNT 


SETPRI 


0PRI05 



155664 
153340 



155654 



153304 



MOV 
MOV 



4.TP4VEC 
0TP4RTN.4 



{SAVE THE EXISTING 004 TRAP VECTOR. 

;SET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 



ENABLE LTC CHECKUP FOR 004 TRAP IN CASE CSR IS NOT THERE. 



CLR TP4FLG 

MOV 0BIT6,Wi:>RDl 

MOV OUORDl.rtO 

MOV CLKCSR.RJ. 

JSR PC.CKTRAP 

MOV TP4VEC.4 

BCS 6* 

CLR CLKHRZ 

BR 8$ 



{CLEAR THE 004 TRAP FLAG. 

{SET UP TO SET BIT6 OF THE LTC CSR. 

{SET LP W0RD1 AS THE CKTRAP MOVE SOURCE. 

{SET UP LTC CSR AS DESTINATION FOR CKTRAP MOVE 

{MOVE ANO CHECK FOR TRAP. 

{RESTORE THE NORMAL 004 TRAP VECTOR. 

{IF NO TRAP, LTC IS THERE SO CONTINUE. 

{CLEAR LTC FREQUENCY WORD TO INDICATE NO LTC. 

{BYPASS THE FOLLOWING CALIBRATION PROCEDURES. 



CALIBRATE THE DELAY ROUTINE MILLI -SECOND DELAY COUNT VALUE. 



6$; 

i ♦ 



JSR 



PC.CALMSL 



CHECK FOR MEMMORy MANAGEMENT PRESENT ON THIS MACHINE. 
IF MEM MGT IS PRESENT, DISABLE IT. 



155600 8$ j 
153254 



153212 
155560 



10*: 



MOV 
MOV 
CLR 
CLR 
MOV 
MOV 
CLR 
CLR 

JSR 
MOV 

BCC 
MOV 

CLR 

JMP 



4, TP4VFC 

0TP4RTN.4 

TP4FIG 

W0RD1 

tfWORDl.RO 

MMSR0.R1 

MMPRES 

MMENAB 

PC.CKTRAP 

TP4VEC.4 

10$ 

«1, MMPRES 

PASCNT 

NEWPAS 



{SAVE THE EXISTING 004 TRAP VECTOR. 

{SET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 

{CLEAR THE 004 TRAP FLAG. 

{PREPARE TO CLEAR THE MEM MGT SRO REGISTER. 

j SELECT CLEARED WORD AS CKTRAP RTN SOURCE. 

{SELECT MEM MGT SRO REGISTER AS DESTINATION. 

{INDICATE NO MEM MGT PRESENT IN CASE IT ISN'T 

{INDICATE MEM MGT IS NOT ENABLED. 

{CLEAR THE MEM MCT SRO REG AND CHECK ^qr TRAP 

{RESTORE THE NORMAL 004 TRAP VECTOR. 

*SKIP INDICATING MEM MGT PRESENT T*" IT ISN'T. 

{INDICATE THAT MEM MGT IS PRESENT, 

{CIR COUNTER USED IN REPORTING KQh VERSION *, 

j SKIP AROUND THE BUS RESET, IT'S BEEN DONE. 



CZDHUBO DH'J-tl F'UNC TST PARTI 
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4:18 








4719 


024612 








024612 


104433 




4 720 


024614 


00506 7 


1554 72 


4 7^1 


024620 






4 722 


024620 


015767 


177777 


4 725 








4 724 








4 725 








472b 








4727 


024626 


005267 


155460 


4 726 


024632 


001002 




4 729 


024634 


005367 


155452 


4750 








4731 








4732 


024640 






4 733 


024640 


005267 


155372 


4734 


024644 


026767 


155366 


4 735 


024652 


002362 




4 736 








4737 


024654 








024654 


016700 


155356 




024660 


104442 






024662 


010001 




4738 


024664 








024664 


103401 




4739 


024666 


000764 




4740 








4741 








4742 








4743 


024670 


012167 


155346 


4 744 


0246 74 


012102 




4745 


024676 


010267 


155330 


4746 


024702 


062702 


000004 


4 74 7 


024 706 


010267 


155322 


4748 


024 712 


012167 


155312 


4749 


024716 


111167 


155316 


4 750 








4 751 








4 752 








4 753 








4 754 


024 722 


016701 


155314 


4 755 


024 726 


005201 




4756 


024730 


005201 




4757 


024 732 


012703 


000007 


4758 


024736 


012702 


002244 


4 759 


024742 


010122 




4 760 


024744 


005201 




4761 


024746 


005201 




4 762 


024 750 


005303 




4763 


024 752 


001373 




4 764 








4 765 








4 766 








4/67 








4 768 


024 754 


012 700 


002526 


4 769 


024 760 


012701 


002 726 
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SEQ 123 



155410 



NEWRES2 BRESET 
CLR 
MOV 



NEWPAS? 



PASCNT 

& l.UNITN 



{RESET THE BUS TO PREVENT ILLEGAL INTERRUPTS. 

TRAP CJRESET 
jCLR COUNTER USED IN REPORTING ROM VERSION i> . 

l RESET LOGICAL DEVICE TO -1 



INCREMENT THE PASS COUNTER, CORRECT FOR ANY OVERFLOW. 
THIS COUNTER IS USED IN THE POM VERSION TEST. 



{ - 



INC 
BNE 
DEC 



PASCNT 
GETPRM 

PASCN T 



^INCREMENT THE PASS COUNTER. 

; BRANCH IK WE HAVE NOT YET! OVERFLOWED. 

jSET PASS COUNT TO 177777 OCTAL. 



155140 



j GET THE HARDWARE PARAMETERS FOR THIS UNIT, 
GETPRM* 

INC UNITN 

CMP UNITN, L$UNIT 

PGE NFWPAS 



j INCREMENT LOGICAL DEVICE NUMBER 
j SEE IF MAXIMUM UNIT NO. EXCEEDED 
}BR IF YES 



GPHARD UNITN.R1 

BCOMPLETE 30$ 
BR GETPRM 



{GET P-TABLE POINTER INTO Rl 

sBR IF DEVICE AVAILABLE 
iSKIP THIS DEVICE 



MOV 

TRAP 

MOV 

BCS 



UNITN, RO 

CSGPHRD 

R0.R1 

30$ 



30$ 



; *** ***** *** 

MOV 
MOV 
MOV 
ADD 
MOV 
MOV 
MOVB 



HARDWARE 
(R1)*.CSRA 
CR1)*,R2 
R2.RXVECA 
04, R2 
R2.TXVECA 
CR1)» .ACTLNS 
(Rl).BRLEVL 



PARAMETER MOVING CODE ♦***♦♦♦*♦♦*****♦ 

{STORE DHU-11 CSR ADDRESS TN DEV . REG. ADDRESS TABLE 
jGET THE RX INTERRUPT VECTOR ADDRESS. 
; STORE RX INT VECTOR ADDRESS. 

INTERRUPT VECTOR ADDRESS. 

VECTOR ADDRESS. 

ACTIVE LINE BIT MAP 

INTERUPT BUS REQUEST LEVEL 



{CALCULATE TX 
{STORE TX INT 
{STORE DHU-11 
: STORE DHU-11 



12$ 



CALCULTATE DEVICE REGISTER ADDRESSES .AND PUT THEM IN THE 
DEVICE REGISTER ADDRESS TABLE. 

{COPY CSR ADDRESS 

{INCREMENT CSR ADDRESS 

1 COPY BY 2. 

.SET UP REGISTER COUNT 

iGET LOCATION WHERE RBUF ADDRESS GOES IN TABLE 

jSTORt REGISTER ADDRESS IN TABLE 

1 INCREMENT REGISTER ADDRESS 

i BY 2, FOR THE NEXT DEVICE REGISTER. 

{DECREMENT REGISTER COUNT 

{LOOP IF NOT DONE 



MOV 


CSRA.R1 


INC 


Rl 


INC 


Rl 


MOV 


#7,R3 


MOV 


flRBUFA,R2 


$: MOV 


K1,(R2)» 


INC 


Rl 


INC 


Rl 


DEC 


R3 


BNE 


12$ 


INITIALISE 


THE BMP CODE 


MOV 


0BMPCQB.RO 


MOV 


0BMPCQE.R1 



QUEUE 



itiFT TW STAR! ADDRESS OF THE OUEUE 
jGET THE END ADDRESS OF THE QUEUE. 



SMPiPPWiBF 



TST PARTI 



4 7 70 
4 7 71 
4 7 7.} 
4773 
4 7 74 
4775 
4776 
4 7 7 ' 
4778 
4779 

4 780 
4781 
4782 



4783 
4 784 

4785 
4 786 
4 78 7 
4788 
4789 



4 790 



4 791 
4V9P 



024 764 
024770 
02477? 
024774 



024 7 76 
025004 
025006 
025014 
025016 
025016 
025022 
025026 
025052 
025034 
025036 
025042 



025046 
025046 
025052 
025054 
025054 
025054 



01006 7 
005020 
020001 
103775 



032767 
001416 
026727 
003412 

016746 

012746 
012746 
010600 
104417 
062 706 



155534 



000020 
155000 



155214 
0054 33 
000002 



000006 









-no 
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15-MAR-84 


09:15 PAGF 


95-3 


14$ j 


MOV 
CLR 
CMP 
BLO 


RO.BMPCQP 
CRO)* 
R0.R1 
14$ 





<^EQ 124 



I SET THE POINTER TO THE START Of THE QUEUE. 
(CLEAR OUT THE CONTENTS OF THE QUEUE. 
{CHECK IF END OF QUEUE HAS BEEN REACHED. 
jLOOP IF NOT ALL DONE. 

REPORT THE UNIT NUMBER IF THE SOFTWARE P-TABLE QUESTION WAS ANSWERED 'ES, 
AND THE MAXIMUM UNIT NUMBER IS GREATER THAN 1. 

155220 BIT 0BIT4, OPTION {CHECK IF THE QUESTION WAS ANSWERED CES. 

SKIP REPORTING UNIT NUMBER IF IT IS DISABLED. 
000001 CMP LSUNIT.01 {CHECK MAXIMUM NUMBER OF UNITS SELECTED. 

00 NOT REPORT UNIT NUMBER IF MAX NUMBER < 1. 
REPORT UNIT NUMBER. 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 



BIT 


<reiT4,0PTI0N 


BEQ 


16$ 


CMP 


L$UNIT,01 


BLE 


16$ 


PRINTF 


WUNIT.UNITN 



UNITN, -CSP) 
OMFUNIT, -CSP) 
02. -CSP) 
SP.RO 

C*PNTF 

#6,SP 



025042 005067 155240 



16$: 

ENDIT 



CLR 



jCLR THE CTRL C TEST ABORT FLAG. 



CTRLCF 

SET THE PROCESSOR PRIORITY TO DISABLE ALL INTERRUPTS. 
SETPRI 0PRIO7 



012700 000340 
104441 



104411 
000000 



;SET PROCESSOR PRIORITY TO 7. 

MOV 
TRAP 



ENDINIT 



TNUM == 



L 10021! 



TRAP 



#PRI0?.R0 
CSSPRI 



C$INIT 



{INITIALIZE THE ASSEMBLER TEST NUMBER VARIABLE. 



crDHueo DK» U f UNC 

INITIAi I/f SKM ION 



4801 
480? 
4 805 
4 804 

4 8C^ 

4806 
480' 
4 808 
480^ 
4810 
4811 
481? 
4813 



T ST PARTI MACRO M1T00 15-MAR 84 09-15 



1 1.0 

PAGE 96 



SEQ 125 



SBTTL AUTOOROP SECTION 



THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF 
THE "ADR" FLAG WAS SET, THE UNIT(S) UNDER TEST ARE CHECKED TO 
SEE V THEY WILL RESPOND. THOSE THAT DON'T ARE IMMEDIATELY 
DROPPED FROM TESTING. 



4814 
48? I 
48?? 



0?50^ 

0?5056 



0?5056 
0?50S6 
0<?5056 



BGNAUTO 



ENDAUTO 



L$AUTO: : 



L 10022: 



1044b! 



TRAP 



C$AtjTO 



CZDHUBO DHU 11 


UNC TS 


AUTODROP SECTION 


4831 




4832 




4833 




4834 




4835 




4836 




483? 




4838 




4839 




4840 025060 




025060 




4841 




4850 025060 


005767 


4851 025064 


001401 


4852 025066 




025066 


104433 


4853 025070 




4854 025070 




025070 


104432 


025072 


000002 


4855 




4867 




4868 




4869 




4870 025074 




0250 74 
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^EQ 126 



SBTTL CLEANUP COOING SECTION 



THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED 
AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED. 



155222 



2$: 



bSNCLN 



1ST 

Bf.Q 

BRESET 



EXIT 

.EVFN 
ENDCLN 



CTRLCF 
2$ 



CLN 



LS CLEAN : : 

{DID WE GET HERE BY CTRL-C FROM TEfT? 

iCTRL-C FROM TEST? NO, SKIP BUS RESET. 

jYES, CLR ANY DMAS OR OUTSTANDING INTERRUPTS. 

TRAP C5RESET 



TRAP 
.WORD 



C$EXIT 
L 10023- 



L10023: 



025074 104412 



TRAP 



CSCLEAN 



CZDHU8C QHU li TUNC TST PARTI 
CLEANUP CODING SECTION 
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^EQ 127 



4879 










4880 










4881 










4882 










4883 










4884 










4885 










4886 










488? 










4888 


0250 76 
025076 








4897 


025076 
025076 


010046 








025100 


012746 


025122 






025104 


012746 


000002 






025110 


010600 








025112 


104417 








025114 


062706 


000006 




4898 


025120 


000427 






4899 










4900 


025122 


045 


101 


040 




025125 


125 


116 


111 




025150 


124 


045 


104 




025133 


066 


045 


101 




025136 


040 


104 


122 




025141 


117 


120 


120 




025144 


105 


104 


040 




025147 


106 


122 


117 




025152 


115 


040 


106 




025155 


125 


122 


124 




025160 


110 


105 


122 




025163 


040 


124 


105 




025166 


123 


124 


111 




025171 


116 


107 


056 




025174 


045 


116 


000 


4901 










4902 


025200 








4903 


025200 
025200 
025202 


000167 
000000 






4904 










4905 










4906 










4907 


025204 

025204 
025204 


104453 







.SBTTL DROP UNIT SECTION 



THE DROP -UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 
TO NO LONGER BE TESTED, 



BGNDU 
PRINTF GDROP.RO 



BR 



EDROP 



L$DU : : 
;REPORT UNIT THAT HAS BEEN DROPPED. 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 
{BRANCH AROUND THE MESSAGE. 



RO.-CSP) 
4DR0P, -CSP) 
#2 , - C SP ) 

SP.RO 

C$PNTF 

#6,SP 



DROP; ,ASCIZ/*A UNIT*D6*A DROPPED PROM FURTHER TESTING>N/ 



EDROP; 



.EVEN 
EXIT 



DU 



.WORD 
.WORD 



J 5, IMP 

L 10024 -2 



ENDDU 



L 10024; 



TRAP 



C*DU 



CZDHUBO DHU-U F'UNC 
DROP UNIT SECTION 



4916 
4917 
4918 
4919 
4920 
4921 
4 922 
4923 
4924 
4925 
4926 
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SEQ 128 



SBTTL ADD UNIT SECTION 



THE ADD -UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES 
TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK 
TO THE TEST CYCLE. 



02520b 
02520b 



BGNAU 



LIAU 



4927 
4 928 
4929 
4930 
4931 
4932 
4933 
4934 
4935 



4936 
4937 
4938 
4939 
4940 



4941 



INSERT ADD CODE HERE. THIS CODE WILL BE EXECUTED AFTER 
AN "ADD" COMMAND. THE PURPOSE OF THIS CODE IS TO 00 ANY 
HOUSEKEEPING THAT MAY BE NECESSARY AFTER A UNIT HAG BEEN ADDED. 
THIS SECTION IS OPTIONAL. 



025206 

025206 00C167 

025210 000000 



025212 
025212 
025212 



EXIT 

.EVEN 

ENDAU 



AU 



.WORD 
.WORD 



J$JMP 
L10025-2 



L10025; 



104452 



TRAP 



C$AU 



M10 



BWe ^ 1 FUNC TST ?%«A - 
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SEQ 129 



4943 

4944 

4945 
4946 
494? 
4948 
4949 
4950 
4951 
4952 
4953 
4954 
4955 
4956 
4957 

4958 

4959 

4960 

4961 

4962 

4963 

4964 

4965 

4966 

4967 

4968 

4969 

4970 

4971 

4972 

4973 

4974 

4975 

4976 

4977 

4978 

4979 

4980 

4981 

4982 

49vi3 

4984 

4985 

4986 

4987 

4988 

4989 

4990 

4991 

4992 

4993 

4994 

4995 

4996 

499/ 

4998 



025214 
025214 

025214 
025222 
025230 
025236 
025244 



025252 
025260 
025266 



025270 
025274 
025300 
025304 
025306 
025312 
025320 
025322 
025326 
025332 
025334 
025340 



025342 
025346 
025354 
025360 
025364 
025370 
0253 72 
0253 76 
025400 



000001 
012767 
C'2767 

C12767 
012767 
012767 



016767 
012767 
005005 



016700 
012701 
004 767 
103402 
052705 
042767 
01C100 
016701 
004767 
103403 
052705 
000434 



012702 
016767 
016700 
012701 
004 767 
103402 
052 705 
010100 
016701 



000001 
177777 
000145 
005560 
015510 



152526 
024124 



154746 
025466 
172446 

100001 
000017 

154714 
172420 

100002 



000010 
154670 
000104 
025466 
1723b2 

100001 
000060 



SBTTL HARDWARE TEST - ADRA - 

+44444**4***4**** *******44*444*4444*44+*+44*44***44* + /. 4444***44444*44444*444*4 

* 
* 
+ 

* 
* 
+ 
+ 
44***4 fi4 4 4*444 4444****** 4**** ********* 44***4**4***4* .44**4** 4*4** 4*****444*4 44 4 



- REGISTER ADDRESS TEST - 

THIS TEST VERIFIES THAT THE DEVICE REGISTERS WILL. RESPOND TO THE PROPER 
UNIBUS HANDSHAKING SIGNALS WHEN ACCESSED. IF THE 0HU11 DOES NOT RESPOND 
TO THE ACCESS ATTEMPTS CIF THE 0HU11 IS AT THE WfcONG ADDRESS, FOR EXAMPLE) 
THE 004 BUS TIME-OUT TRAP IS DETECTED BY THIS ROUTINE AND AN ERROR 
IS REPORTED. THIS TEST IS PERFORMED ON LINE ONLY. 



155102 

155056 
156532 
156526 
156522 



155042 
152516 



BGNTST 

T>JM ■ 
MOV 
MOV 
MOV 
MOV 
MOV 



TNUM ♦ 1 

OTNUM.TSTNUM 

O-l.CTRLCF 

0101. .ERRNBR 

0EMO1O3.ERRMSG 

0ER0101.ERRBLK 



Tl: ; 

{INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

,SET UP THE TEST NUMBER. CD 

{INDICATE THAT WE ARE IN A TEST. 

{SET THE TEST ERROR NUMBER IN THE TABLE. 

{SET UP THE TEST FAILURE MESSAGE IN THE TABLE 

{SET -UP THE ERROR ROUTINE IN THE ERROR TABLE. 



SET UP TO CATCH ANY 004 TRAPS WHICH OCCUR: 



MOV 
MOV 
CLR 



4.TP4VEC 

0TP4RTN.4 

R5 



{SAVE THE EXISTING 004 TRAP VECTOR. 

{SET 004 TRAP VECTOR TO OUR SERVICE RTN ADR 

{CLEAR THE ERROR FLAGS. 



HERE BEGINS THE LOOP TO TEST THE REGISTERS FOR A LINE. 

FIRST TEST THE CSR AND SET THE IND.ADR.REG (I.A.R) FIELD 



? - 



000146 



000110 





MOV 


C5RA.R0 




MOV 


052$, Rl 




JSR 


PC, CKTRAP 




BCS 


4$ 




BIS 


0100001, R5 


4$: 


BIC 


017.52$ 




MOV 


Rl.RO 




MOV 


CSRA.R1 




JSR 


PC, CK TRAP 




BCS 


6$ 




BIS 


0100002, R5 




BR 


40$ 


; f 


NOW, WE 


TEST EACH REG 


6$: 


MOV 


08. ,R2 




MOV 


CSRA,50$ 


8$: 


MOV 


50$, RO 




MOV 


052$, Rl 




JSR 


PC.CKTRAP 




BCb 


10$ 




BIS 


0100001 ,R5 


10$: 


MOV 


Fl.RO 




MQV 


50$, Rl 



CSR 



THE CKTRAP MOVE 50URCE 



SET UP 

SET UP DESTINATION LOCATION FOR CKTRAP MOVE. 

MOVE AND CHECK FOR TRAP. 

IF NO TRAP, BYPASS ERROR. 

SET FATAL READ ERROR FLAGS. 
{CLEAR THE I.A.R FIELD OF THE CSR DATA. 
tU3E OLD DESTINATION FOR SOIJRCE OF CKTRAP MOVE 
iSET UP CSR AS THE CKTRAP MOVE DESTINATION. 
{MOVE AND CHECK FOR TRAP, 
i IF NO TRAP. BYPASS ERROR. 



{SET FATAL WRITE ERROR 
{EXIT AND REPORT FATAL 



FLAGS. 
ERROR. 



iINIT REGISTER CUUNTER TO 8, 

{INITIALI7E THE REGISTER POINTER. 

{SET UP REGISTER AS THE SOURCE FOR CXTRAP MOVE 

SEI UP LOCAL STORAGE AS THE DES FOR CKTRAP. 

PERFORM THE MOVE t CHECK FOR TRAP. 

IF NO TRAP. BYPASS THE SETTING OF ERROR FLAGS 

SET FATAL READ ERROR FLAGS. 
iUSt OLD DEST AS SRC FOR CKTRAP MOVE 
{SET UP REGISTER AS THE DEST FOR CKTRAP MtWt. 



CZDHUBO DHU-H 


FUNC TST 


PARTI 


HARDWARE TEST 




- ADRA 


4999 025404 


004 767 


172342 


5000 025410 


103402 




5001 025412 


052705 


100002 


5002 025416 


00526 7 


000042 


5003 025422 


005267 


000036 


5004 025426 


005302 




5005 025430 


001551 




5006 






5007 






500a 






5009 






5010 






5011 






5012 025432 


016/6/ 


154664 


5013 025440 


005705 




5014 025442 


100012 




5015 






5016 






5017 






5018 025444 






025444 


104460 




5019 






5020 






5021 025446 






025446 


016700 


154564 


025452 


104451 




5022 025454 


005067 


154626 


5023 025460 






025460 


104444 




5024 025462 


000402 




5025 






5026 






5027 025464 


000000 




5028 025466 


000000 




5029 






5030 






5031 0254 70 


005067 


154612 


5032 025*74 






025 : /4 






025474 


104401 
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JSR 


PC, CKTRAP 


BCS 


12$ 


BIS 


0100002, R5 


INC 


50$ 


INC 


50$ 


DEC 


R2 


BNE 


8$ 



N10 

100-1 



SEQ 130 



» PERFORM THE MOVE, CHECK FOR TRAP. 

;IF NO TRAP, BYPASS THE SETTING OF ERROR FLAGS 

sSET FATAL WRITE ERROR FLAGS. 

j INCREMENT THE REGISTER 

t POINTER BY 2. 

{COUNT THE REGISTER. 

jLOOP TO TEST THE. NEXT REGISTER ADDRESS. 



DONE CHECKING DEVICE REGISTER ADDRESSES. 
REPORT ANY ERRORS AND EXIT. 



152344 40$: 



MOV TP4VEC.4 
TST R5 
BPL 60$ 



j RESTORE THE NORMAL 00-1 TRAP VECTOR 
j CHECK THE ERROR FLAGS. 
jEXIT ROUTINE IF NO ERRORS. 



REPORT "DEVICE REGISTER ACCESS TEST FAILED" 
ERROR 



TRAP 



DODU 



CLR 
DOCLN 

BR 



UNITN 
CTRLCF 

60$ 



{DROP THIS UNIT FROM FUTHER TESTING, 

HOV 
TRAP 

{INDICATE NO CTRL-C ABORT FROM TEST. 

{ABORT THIS SUB PASS. 

TRAP 



C$ERROR 



UNTTN.RO 
CSDODU 



C$DCLN 



.+*+**+*+*+*+**** LOCAL STORAGE. **♦*♦♦*+****+***+♦***♦ i»* >+++++**+**++¥*♦ 
50$: .WORD {STORAGE FOR THE SOURCE OR DEST OF THE CKTRAP MOVE. 
52$: .WORD i STORAGE FOR THE SOURCE OR DEST OF THE CKTRAP MOVE. 
: *+♦**+*++♦♦++*****+ END *+**++******* + + *** + ************ + * + + * + *****• + ***** 



60$? CLR CTRLCF 
ENDTST 



{INDICATE THAT WE ARE NOT WITHIN A TEST. 

L10026: 

TRAP C$ETST 



CJDMUHO OK' 11 f 


'UNC TbT 


PARTI 


MACRO r 


HARDWARE TEST 




• MRSTA 




5034 








5035 








503* 








503 ; 








5038 








50 3 ^ 








5040 








5041 0?54 /6 








0254 76 








504? 


000002 






504 3 0254 .'6 


012/67 


000002 


1546?0 


5044 025504 


01276/ 


177/77 


154574 


5045 02551? 








02551? 


012/00 


000240 




0?5516 


104441 






5046 025520 


012/67 


000001 


156?40 


504,' 025526 


012/6/ 


005616 


156236 


5048 025534 


012767 


016042 


156232 


5049 








5050 








5051 








5052 025542 


012/01 


011610 




5053 025546 


012/02 


000040 




5054 0?5552 


005003 






5055 025554 


016/04 


15446? 




5056 0?5560 


004 76 7 


172400 




505/ 025564 


103410 






5058 








5059 








5060 








5061 








506? 0?5 C >66 








025566 


104455 






506 3 0255/0 


004 76/ 


1/4550 




50M 0255/4 


012/01 


011610 




5065 025600 


0O4/6 7 


172360 




5066 025604 


103016 






506 .' 








5068 








506 l l 








50/0 025606 


012/01 


011610 




50/1 025612 


010214 






50/2 025614 


0O4 76Z 


172344 




50/5 025620 


105010 






50/4 02562? 


012/0? 


OU610 




50/5 0?56?6 


160102 






50/6 0256 50 


001415 






50// 025*5? 


0202?/ 


000764 




50/8 0256 56 


0024 1 7 






50.'-* 025640 


000424 






5080 








508 1 








50V 








508 5 








:>U84 02564^ 


012/6 ' 


OOU 5 1 1 


1561JC 


5085 025650 


012/01 


005651 




5Q36 0256^4 
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I 



r >EQ 131 



,SBTU 

¥ * * 



HARDWARE TEST 



MRSfA 



- MASTER RESET WITH SEl.FTEST TEST 
THIS TEST VERIFIES THAT THE MASTER RESET BIT WILL CLEAR AFTER A DEVICE 
RESET AND THE PERFORMANCE OF THE DUT ROM BASED SELFTFST. 

* * ************** **** + *********#******#********** i *************4*A****** i ***** 

QGNTST 

T2: : 
I INCREMENT THE ASSEMBLT TIME TEST COUNTER. 
t sET UP THE TEST NLTOER. (2) 

j INDICATE THAT WE ARE IN A TEST, 
I ALLOW LTC INTERRUPTS. 

MOV 0PRI05.R0 

TRAP CfSPRI 

jSET ERROR TYPE AS FATAL IN ERROR TABLE. 
iSET ERROR MESSAGE ADDRESS IN ERROR TAflif r 



TNUM - 

MOV 
MOV 
SETPRI 



MOV 
MOV 
MOV 



TNtn ♦ 1 
OTNUM.TSTNUM 
l.CTRLCF 



•l.ERRTYP 

0EM02M.ERRMSG 



OER0201,ERRBLK ( SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 



j WAIT UP TO 5 SECONOS FOR THE DUT MASTER RESET BIT TO CLEAR, 

MOV 05000., Rl i TIME OUT VALUE IS 5.0 SECONOS, 

MOV 0GIT05,R? >WAITING FOR MASTER RESET BIT. 

CLR R3 jWAITING FQR BIT TO CLEAR. 

MOV CSRA,R4 jBIT IS IN THE OUTS CSR. 

JSR PC.MSLGET ,WAIT FOR DUT CSR MR BP TO CLEAR. 

BCS 2$ iSKIP TO RESFT Out IF MR CLEAR. 

i DUT MASTER RESET BIT DID NOT GO CLEAR, DEVICE MAi RF STl?CK IN SOME 
i 000 STATE. TRY TO RESET DEVICE WITH A BUS RESET. 

BRESET |N0, TRt TO JOG DEVICE WITH BUS RE SC T , 

TRAP C* WE SET 

JSR PC.SKPST5 | TRt TO SKIP THE St if TEST. 

MOV 05000.. Rl iMMt Ui.iT V Al l€ IS 5,0 SECONDS. 

JSR PC, MSI GIT jWAU FOW DUT CSR MR BIT TO CI EAR. 

BCC 4J |(,0 REPORT ERROR V MR BIT DID NOT CLEAR. 

, SM THE MASTER REM T Bl T ANO VERUi THAT IT Cl EARS WITHIN THE PROPER T I ME , 

21 j MOV 05000., R I i T IMt. OUT VALUE IS 5.0 SECONOS. 

I SET TMf DUT MASTER RF SE T BIT. 
»WAIT »U« OUT CSR MR BIT TO CLEAR, 
I GO REPORT ERROR I> MP BIT DID NOT CLEAR. 

iCAlC'tAU • L» Ms E OR MR TO Cl.EAH. 

I GO REPORT ERROR If MR CLEAR IMMEUMMM 

i GO REPOT. T LRROR If MR Cl E AH [N « 1 ? 5E..0ND. 
lEXIT THE- TEST WITHOUT ERROR, 

J • 

j I RROR R* PORT-, j 

I 

I REPORT MR &1T WOsJl D NOT CLEAR AFTtR A DUT RtSE T . 

41} MOv 1*201 . ,*RRNfJR i 5E T ThF t RROR NU*m H IM \ RROR r .un \ . 

MOv 0EMQ202 *R1 |)HK*f I RROR MESiiAUt » 

CRRQR i REPORT iHHUR» ***** ERROR 3-V1 ***** 



MOV 


05000. ,R1 


MOV 


R2,(R4 j 


JSR 


pc. msi I'.r r 


BCC 


4* 


MUV 


05000. ,R? 


5UH 


Rl ,R? 


HEU 


M 


CMP 


R.'.oSOO, 


BL T 


H$ 


BR 


60S 



£Mft l W 



1 ► UNC T s T P 



'titer a 





0^5654 


104460 




vop ; 


(VSfcSh 


000415 




sow 








50fl9 








5090 


025660 


012767 


000 Mi* 


5091 


025666 


012701 


006024 


50 l V 


0256.Y 








0256 72 


104460 




5093 


0256 74 


000406 




5094 








509s 








5096 


0256 7h 


012/6 7 


000313 


509 7 


025 704 


012701 


00616/ 


50^8 


025 710 








0*75 710 


1044*0 




5099 








5100 


025*1.' 








025712 


012700 


000340 




025716 


104441 




MOl 


025 720 


00506 7 


154362 


5102 


025 724 
025 724 








025724 


104401 





CI 1 
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156102 6* 



156064 Hi 



BR 

l REPORT MR 
MOV 
MOV 
ERROR 

BR 

I REPORT MR 

MOV 

MOV 

ERROR 



60$ 



(EXIT THF II ST . 



TRAP 



CSF.RROR 



BIT ClTAR IMMEDIATELY AFTER OUT RESF.T. 
0202. .FRRNaR jSET THE ERROR NUMBER IN ERROR TABU. 
0EMOi?O3,Rl j SELECT ERROR MESSAGE. 

^REPORT ERROR. >>>>> ERROR 0202 <<<<< 

TRAP CiERROR 
60$ iFXIT THE TEST, 

CLEAR WITHIN \/£ SECOND OF" DUT RESET. 
02Q3..FRRNBR jSET THE ERROR NUMBER IN ERROR TABIE. 



601; 



SFTPRI 



CLR 
ENDTST 



0F.M0204.R1 

0PRI07 
CTRLCF* 



j SELECT ERROR MESSAGF . 
, REPORT ERROR. 



>>»>>> ERROR 0203 < < < < < 
TRAP C5ERR0R 



jDISABl E ALL INTERRUPTS. 

MOV 
TRAP 

I INDICATE THAT WE COMPLETED Tnf TEST 

L 10027: 

TRAP 



OPRIO/.RO 

C4SPRI 



C*£TST 



5EQ Wet 



[)'l 1 



CiOHUK) OMU 11 HJNC TST PARTI MACRO M1200 
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SEQ 133 



5104 






5105 






5106 






5107 






5108 






510<> 






5110 






51U 025726 






0257^6 






5112 


000003 




5115 025 726 


012767 


000003 154 3/0 


5114 025734 


012767 


1/7777 154344 


5115 025 742 






025 742 


012700 


000240 


025746 


104441 




5116 025750 


012767 


OOCOOl 156010 


5117 025/56 


012767 


006346 156006 


5116 025764 


012767 


016042 156002 


5119 






5120 






5121 






5122 025/72 


012701 


011610 


5123 025776 


012702 


000040 


5124 026002 


005003 




5125 026004 


016704 


154232 


5126 026010 


004 76 7 


172150 


512 7 026014 


103410 




5128 






5129 






5130 






5131 






5132 026016 






026016 


104433 




5133 026020 


004 76 7 


174 320 


51 M 026024 


012/01 


011610 


5135 026030 


004 76 7 


172130 


5136 026034 


103024 




5137 






5138 






5139 






5140 






5141 026036 


012/01 


000310 


5142 026042 


010214 




5143 026044 


004767 


174274 


5144 026050 


004 767 


172110 


5145 026054 


103007 




5146 026056 


012/02 


000310 


514 7 026062 


160102 




5148 026064 


020227 


000012 


5149 0260/0 


002415 




5150 026072 


0004 51 




5151 






5152 






5153 






5154 0260 74 


012701 


01 MOO 


5155 026100 


004 76 7 


172060 


5156 026104 


103416 





r -BTTl 
* + * 



HARDWARE. TEST 



MRSSTA 



- MASTER RESET WITH SKIP SELFTEST TEST 
THIS TEST VERIFIES THAT THE MASTER RESET BIT WILL CLEAR AFTER A DEVICE 
RESET AND THE SKIPPING OF THE DUT ROM BASED SELFTEST. 



TMjm -- TNUM • 1 

MOV OTNUM.TSTNUM 

MOV l.CTRLCF 

5ETPRI 0PRIO5 



MOV Ol.tRRTYP 

MOV *FM0301,ERRMSG 

MOV 0ER0201.ERRBLK 



T3: : 
I INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
I SET UP THE TEST NUMBER. (3) 
j INDICATE THAT Ut ARE IN A TEST. 
lALLOW LTC INTERRUPTS. 

MOV *»RI05,R0 
TRAP CiSPRI 
j SET ERROR TYPE AS FATAL IN ERROR TABLE, 
j SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
i SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 



} WAIT UP TO 5 SECONDS FOR THE DUT MASTER RESET BIT TO CLEAR. 



MOV 

MOV 
CLR 
MOV 
JSR 
BCS 



*5000, ,R1 

♦BIT05.R2 

R3 

CSRA.R4 

PC.MSLGET 

2$ 



jTIME-OUT VALUE IS 5,0 SECONDS. 

{WAITING FOR MASTER RESET BIT. 

{WAITING FOR BIT TO CLEAR. 

jBIT IS IN JH£ OUT S CSR. 

{WAIT FOf QUT_CSR.MR BIT TO CLEAR. 

jSKIP TO RESET DUT IF MR CLEAR. 



j DUT MASTER RESET BIT DID NOT GO CLEAR. DEVICE MAY BE STUCK IN SOME 
; ODD STATE. TRY TO RESET DEVICE WITH A BUS RESFT. 



BRESET 

JSR 

MOV 
JSR 
BCC 



PC.SKPSTS 
$5000. ,R1 
PC.MSLGET 
6$ 



{NO, TRY TO JOG DEVICE WITH BUS RESET. 

TRAP 

{TRY TO SKIP THE SELFTEST. 
I TIME -OUT VALUE. IS 5.0 SECONDS. 
,WAH FOR DUT CSR MR BIT TO CLEAR. 
jGO REPORT ERROR IF MR BIT DID NOT CLEAR. 



C*RESfcT 



1 SET THE MASTER RESET BIT, TRi TO SKIP THE SELFTEST, AND VERIFY THAT THE 
: MR BIT CLEARS WITHIN 1/5 SECOND. 



2$ 



MOV 
MOV 

JSR 

JSR 

BCC 
MOV 
SL« 
CMP 

BIT 
BR 



0200. ,R1 

R2.CR4) 

PC.SKPSTS 

PC.MSLGET 

At 

0200. ,R2 

R1.R2 

R2.010. 

8$ 

60$ 



j TIME -OUT VALUE IS 1/5 SECONO, 

{SET THE DUT MASTER RESET BIT. 

{TRY TO SKIP THE SELFTEST. 

{WAIT FOR OUT CSR MR BIT TO CLEAR. 

I GO FIND OUT WHAT IS WRONG IF MR NOT CLEAR. 

{CALCULATE OF MS FOR MR TO CLEAR. 

{GO REPORT ERROR IF MR CLEAR IN < 10 MS. 
{EXIT THE TF.ST WITHOUT ERROR. 



MR DID NOT CLEAR WITHIN 1/5 SECOND. SEE IF* IT CLEARS WITHIN 5 SECONOS. 
41; 



MOV 
JSR 
BCS 



04800. ,fU 
PC.MSLGET 
10$ 



{ T IMF OUT VALUE IS 5 SECONDS MINUS 1 S SECOND. 

{WAIT f OR DUT CSR MR BIT TO CLEAR, 

jGU REPORT ERROR IF MR CLEARED F 1NALI. t . 



E 1 1 



c/DHueo dhu-11 kunc rsT part 

HARDWARE TEST - MR 



5TA 
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SEO 134 



5157 








515d 








515 v > 








5160 








5161 


026106 


012767 


000455 


5162 


026114 


012701 


005651 


5163 


026120 








026120 


104460 




5164 


026122 


000415 




5165 








5166 








5167 


026124 


012767 


000456 


5168 


026132 


012701 


006420 


5169 


026136 








026136 


104460 




5170 


026140 


000406 




5171 








5172 








5173 


026142 


012767 


000457 


5174 


026150 


012701 


006560 


5175 


026154 








026154 


104460 




5176 








5177 


026156 








026156 


012700 


000340 




026162 


104441 




5176 


026164 


005067 


154116 


5179 


026170 
026170 








026170 


104401 





! ERROR REPORTS: 



155654 6$ 



155636 8$ 



155620 10$ 



60$ 



{REPORT MR BIT WOU..D HOT CLEAR AFTER A OUT RESET. 

MOV #0301. .ERRNBR iSF.T THE ERROR NUMBER IN ERROR TABLE. 
MOV 0EMO2O2.R1 ; SELECT ERROR MESSAGE, 
ERROR {REPORT ERROR. >>>>> ERROR 40301 <<<<< 

TRAP C$ERR0R 
BR 60$ jEXIT THE TEST. 

{REPORT MR BIT CLEAR WITHIN 10 MS AFTER OUT RESET. 

MOV 00302.. ERRNBR »SET THE ERROR NUMBER IN ERROR TABLE. 
MOV 0EM0302>R1 iSELECT ERROR MESSAGE. 
ERROR jREPORT ERROR. >>>>> ERROR 40302 <<<<< 

TRAP C$ERROR 
BR 60$ jEXIT THE TEST. 

{REPORT MR CLEARED BETWEEN 1/5 SECOND ANO 5 SECONDS OF OUT RESET. 
MOV 00303., ERRNBR {SET THE ERROR NUMBER IN ERROR TABL F . 



MOV 
ERROR 


0EM0303,R1 


SETPRT 


0PRI07 


CLR 
ENDTST 


CTRLCF 



i SELECT ERROR MESSAGE, 
{REPORT ERROR. 



>>^>> ERROR 00303 <<<-<< 



TRAP 



{DISABLE ALL INTERRUPTS. 

MOV 
TRAP 

{INDICATE THAT WE COMPLETED THE TEST, 



L 100 30 : 



TRAP 



CSERROR 



OPRI07.R0 
C$SPR1 



CJETST 



CZDHUeO DHU-11 
HARDWARE TEST 



5181 
5182 
5183 
5184 
5185 
5186 
5187 
5188 
5189 



FUNC TST 



5190 



5191 

5192 

5193 

5194 

5195 

5196 

5197 

5198 

5199 

5200 

5201 

5202 

5203 

5204 

5205 

5206 

5207 

5208 

5209 

5210 

5211 

5212 

5213 

5214 

5215 

5216 

5217 

5218 

5219 

5220 

5221 

5222 

5223 

5224 

5225 

5226 

5227 

5228 

5229 

5230 

5231 

5232 
5233 



026172 
026172 
026172 
026.172 
026176 

026200 
026206 
026214 
026222 
026230 



026236 
026242 
026246 
026250 
026254 
026256 
026262 
026266 



0262 70 
026272 
026276 
026300 
026302 
026306 
026312 
026314 
026316 
026320 



026 322 

026330 
026334 
026334 
026336 



012700 
104441 
000004 
012767 
012767 
012767 
012767 
012767 



012701 
012702 
005003 
016704 
010214 
004 767 
004767 
103015 



012400 
012701 
011402 
010200 
042700 
02002 7 
001012 
005301 
001367 
000415 



012767 
012701 

104460 
000406 



PARTI MACRO 
- RXCHRA - 
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SEQ 135 



000240 



000004 
177777 
000001 
006737 
016042 



011610 
000040 

153766 

174062 
171676 



154116 
154072 
155544 
155542 
155536 



.SBTTL HARDWARE TEST - RXCHRA - 

. ♦ » ****♦******♦**************#**#******»**#**#*************************«****** 

;* - RBUF REGISTER RX CHARACTFR FIELD TEST - 

I* THIS TEST VERIFIES THAT THE RX CHARACTER FIELD OF THE OUT RBI* REGISTER 

j* APPEARS TO BE FUNCTIONING CORRECTLY, THIS TEST USES THE CODES WHICH 

?♦ SHOULD BE IN THE FIFO AFTER A BOARD RESET AND SKIP SELFTEST SEQUENCE. 

{♦ 

BGNTST 

T4: : 
j ALLOW LTC INTERRUPTS. 

MOV OPRI05.RO 
TRAP C*SPRI 
{INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
j SET UP THE TEST NUMBER. (4) 
j INDICATE THAT WE ARE WITHIN A TEST. 
I SET ERROR TYPE AS FATAL IN ERROR TABLE. 
{SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
{SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 



SETPRI 0PRI05 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 



' TNUM * 1 
OTNUM.TSTNUM 
O-l.CTRLCF 
Ol.ERRTYP 
OEM0401.ERRMSG 
0ERO2O1.ERRBLK 



000006 



177476 
000201 



{ SET THE OUT CSR MASTER RESET (MR) BIT. PERFORM THE SKIP SELFTEST SEQUENCE, 
j AND WAIT UP TO 5 SECONDS FOR THE MR BIT TO CLEAR. 

{TIME-OUT VALUF IS 5.0 SECONDS. 

{WAITING FOR MASTER RESET BIT. 

{WAITING FOR BIT TO CLEAR. 

{BIT IS IN THE OUT'S CSR. 

{SET THE DUT MASTER RESET BIT. 

{SKIP THE SELFTEST. 

{WAIT FOR OUT CSR MR BIT TO CLEAR. 

iGO REPORT ERROR IF MR DID NOT CLEAR. 

DUT AND VERIFY THAT THEY ARE VALID SELFTEST 

{INCREMENT POINTER TO POINT TO OUT RBUF REGSTR 

{INITIALIZE THE LOOP COUNTER, 

{READ A CHARACTER FROM THE DUT RBUF REGISTER. 



MOV 


05000. ,R1 


MOV 


OBIT05.R2 


CLR 


R3 


MOV 


CSRA,R4 


MOV 


R2,CR4) 


JSR 


PC.SKPSTS 


JSR 


PC.MSLGET 


BCC 


4$ 


! REhD 6 CHARACTERS FROM THE 


j CODES. 




MOV 


(R4)».R0 


MOV 


06.R1 


2*: MOV 


(R4) t R2 


MOV 


R2.R0 


BIC 


W7M76.RO 


CMP 


R0.420L 


BNE 


6$ 


DEC 


HI 


BNE 


2* 


BR 


60$ 



{REMOVE ALL BUT 81TS 
{CHECK THAT BITS 0,6, AND 7 
{GO REPORT ERROR IF CODE IS 
{COUNT THIS LOOP ITERATION. 
{LOOP IF NOT ALL LINES DONE 
{EXIT TEST, NO ERROR FOUND. 



SPECIFIC TO SELFTEST CODE 
ARE CORRECT. 
NOT SELFTEST CODE, 



ERROR REPORTS: 



000621 
005651 



{REPORT MR BIT WOULD NOT CLEAR AFTER A OUT RESET. 
155440 4$: MOV 00401 . .EPRN8R jSET THE ERROR NUMBER IN ERROR TABLE. 

MOV 0EM0202.R1 {SELECT ERROR MESSAGE. 
ERROR {REPORT ERROR. >>^>> ERROR 00401 *^** 

TRAP CSERROR 
BR 60$ {EXIT THE TEST. 

{REPORT IMPROPER CODF FOUND IN DUT RBUF AFTER RESET (SKIP St'lKTfSn. 



G 1 1 



SiMfeW 



TUNC TST PARTI MACRO M1200 15-MAR-64 09<15 PAGE 103-1 
- RXlHRA 



^EQ 136 



5234 026340 

5235 026346 

5236 026352 
026352 

5238 026354 
026354 
026360 
523^ 026362 
C240 026366 
026366 
026366 



012 76 7 000622 155422 6$; 
012701 007015 



104460 



012700 000340 

104441 

005067 153720 



104401 



60$: 



MOV 00402. .ERRNBR lSET THE ERROR NUMBER IN ERROR TABLE. 
MOV 4EM0402.R1 {SELECT ERROR MESSAGE. 
ERROR i REPORT ERROR. >>>>> ERROR ,70402 ***** 

TRAP CSERROR 



SETPRI 0PRI07 



CLR CTRLCF 

ENDTST 



{DISABLE ALL INTERRUPTS. 

MOV 
TRAP 

jINOICATE THAT WE COMPLETED THE TEST. 



L10031: 



TRAP 



#PRI07,R0 

C*SPRI 



CSETST 



H 1 1 



CZDHUeo DHy 11 TUNC TST PARTI 
HARDWARE TBST - RXFFDA 
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SEQ 137 



5242 
5243 
5244 
5245 
5246 
524 7 
5248 
5249 

5250 
5251 



5252 
5253 
5254 
5255 
5256 
5257 
5258 
5259 
5260 
5261 
5262 
5263 
5264 
5265 
5266 
5267 
5268 
5269 
5270 
5271 
5272 
5273 
5274 

5275 
52 76 
5277 
5278 
5279 
5280 
5281 
5282 
5283 
5284 
5235 
5286 
5287 
5288 
5289 
5290 

5291 
5292 
529 r 



026370 
026370 
026370 
026370 
026374 

026376 
026^04 
026412 
026420 
026426 



026434 
026440 
026444 
026446 
026452 
026454 
026460 
026464 



026466 
026470 
0264 74 
026476 
026502 
026504 
026506 
026510 
026512 



026514 
<- .6522 
026526 
026526 
026530 



012700 
104441 
000005 
012767 
012767 
012767 
012767 
012767 



012701 
012702 
005003 
016704 
010214 
004 76 7 
004 76 7 
103013 



012400 
012701 
011402 
012700 
040200 
001012 
005301 
001371 
000415 



000240 



000005 
177777 

000001 
007165 
016042 



011610 
000040 

153570 

173664 
171500 



000010 



070000 



.SBTTL HARDWARE TEST - RXFFDA - 

- RBUF REGISTER RX FLAG FIELD TEST - 
THIS TEST VERIFIES THAT THE FIELD OF 3 FLAG BITS IN THE RBUF READS 
AS ALL ONES WHEN THE SELFTEST CODES ARE BEING READ FROM THE DUT 
AFTER A BOARD RESET AND SKIP SELFTEST SEQUENCE, 



SETPRI 0PRI05 



153720 
153674 
155346 
155344 
155340 



BGNTST 

T5: ; 
j ALLOW LTC INTERRUPTS, 

MOV OPR105.R0 
TRAP CSSPRI 
j INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
{SET UP THE TEST NUMBER, (5) 
i INDICATE THAT WE ARE WITHIN A TEST. 
j SET ERROR TYPE AS FATAL IN ERROR TABLE. 
{SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
j SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 



■ TNUM » 1 
OTNUM.TSTNUM 
0-1. CTRL CF 
Ol.ERRTYP 
OEM0501,ERRMSG 
0ER0201,ERRBLK 



SET THE DUT CSR MASTER RESET (MR) BIT, PERFORM THE SKIP SELFTEST SEQUENCE, 
AND WAIT UP TO 5 SECONDS FOR THE MR BIT TO CLEAR. 

TIME OUT VALUE IS 5.0 SECONDS. 

WAITING FOR MASTER RESET BIT. 

WAITING FOR BIT TO CLEAR. 

BIT IS IN THE DUT'S CSR. 

SET THE DUT MASTER RESET BIT. 

SKIP THE SELFTEST. 

WAIT FOR DUT CSR MR BIT TO CLEAR. 

GO REPORT ERROR IF MR DID NOT CLEAR. 



MOV 


05000. ,R1 


MOV 


06IT05.R2 


CLR 


R3 


MOV 


CSRA 14 


MOV 


R2 , ( '. . O 


JSR 


PC.SKPSTS 


JSR 


PC.MSLGET 


BCC 


4i 



READ 8 CHARACTERS FROM THE OUT AND VERIFY THAT ALL 
SET FOR EACH CHARACTERS. 



3 RX ERROR FLAGS ARE 



2$; 



012767 000765 
012701 005651 

104460 
000406 



155246 4$; 



026532 012767 000766 155230 6$ 



MOV 


(R4)»,R0 


MOV 


08. ,R1 


MOV 


(R4),R2 


MOV 


O70000.R0 


PIC 


R2.R0 


BNE 


6* 


DEC 


Rl 


BNE 


2$ 


BR 


60$ 


30R REPORTS 


: 


{REPORT MR 


BIT WOULD NOT CLE 


MOV 


00501. ,ERRNBR 


MOV 


0EM0202.R1 


ERROR 




BR 


60$ 


{REPORT ONE 


OR MORE RX ERROR 


MOV 


00502. .ERRNBR 



5 INCREMENT POINTER TO POINT TO DUT RBUF REGSTR 

{INITIALIZE THE LOOP COUNTER. 

{READ A CHARACTER FROM THE DUT RBUF REGISTER. 

{CALCULATE BIT MAP OF CLEAR RX ERROR FLAGS. 
} G0 REPORT ERROR IF NOT ALL RX ERROR FLAGS SET 
;COUNT THIS LOOP ITERATION. 
{LOOP IF NOT ALL LINES DONE. 
{EXIT TEST, NO ERROR FOUND. 



{SET THE ERROR NUMBER IN ERROR TABLE. 
{SELECT ERROR MESSAGE. 

{REPORT ERROR. ^>>^> ERROR 00501 ***** 

TRAP CSEHROR 
{EXIT THE TEST. 

H AG5 ^OW/i CLEAR WITH SELFTEST COM . 
{SET THE ERROR NUMBER IN ERROR TABLE* 



CZDHUBO DHU-ll FUNC TST PARTI 
HARDWARE. TEST 



MACRO M1200 



5295 026540 

5296 026544 
026544 

529? 

5298 026546 
026546 
026552 

5299 026554 

5300 026560 
026560 
026560 



012701 
104460 



012700 
104441 
00506 7 



104401 



- RXFFDA 
007241 

000540 
153526 



60$ 



1 1.1 
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MOV 

ERROR 



SETPRI 



Ct.R 
ENDTST 



tfEM0502,Rl 

0PRI07 
CTRLCF 



{SELECT ERROR MESSAGE. 
jREPORT ERROR. 



>>>>> ERROR #0502 < < < < < 



TRAP 



{DISABLE ALL INTERRUPTS. 

MOV 
TRAP 

{INDICATE THAT WE COMPLETED THE TEST. 



L 10032; 



TRAP 



C5ERR0R 



GPRI07.R0 
C$SPRI 



C$ETST 



SEQ 138 



J 1 1 



CZDHUBO DHU-11 
HARDWARE TEST 



5302 
5303 
5304 
5305 
5306 
5307 
5308 
5309 
5310 



FUNC TST 



5311 



5312 

5313 

5314 

5315 

5316 

5317 

5318 

5319 

5320 

5321 

5322 

5323 

5324 

5325 

5326 

5327 

5328 

5329 

5330 

5331 

5332 

5333 

5334 

5335 

5336 

5337 

5338 

5339 

5340 

5341 

5342 

5343 

5344 

5345 

5346 

5347 

5348 

5349 

5350 

5351 

5352 

5353 

5354 



026562 
026562 
026562 
026562 
026566 

026570 
026576 
026604 
026612 
026620 



026626 
026632 
026636 
026640 
026644 
026646 
026652 
026656 



026660 
026664 



0266b6 
026672 
026674 
026676 
026700 
026 704 
026706 
026710 
026712 



026 714 
026722 
026/26 
026726 



012700 
104441 
000006 
012767 
012767 
012767 
012767 
012767 



012701 
012702 
005003 
016704 
010214 
004767 
004767 
103016 



032714 
001422 



012705 
010403 
012300 
011300 
032714 
001427 
005305 
001372 
000416 



012767 
012701 

104460 



PARTI 
- RDAA 



000240 



000006 
177777 
000001 
007575 
016042 



011610 
000040 

153376 

173472 
171306 



000200 



001130 



000200 
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.SBTU. HARDWARE TEST 



SEQ 139 



- ROAA - 



- CSR RX DATA AVAILABLE BIT TEST - 

THIS VEST VERIFIES THAT THE OUT CSR RX DATA AVAILABLE BIT IS SET B^r THE 

INCLUSION OF THE SELFTEST COOES IN THE OUT FIFO AND THAT THE BIT CLEARS 

AFTER THE FIFO HAS BEEN EMPTIED. 



SETPRI 4PRI05 



153526 
153502 
155154 
155152 
155146 



BGNTST 

T6;: 
{ALLOW LTC INTERRUPTS, 

NOV 0PRIO5.RO 
TRAP CSSPRI 
t INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
{SET UP THE TEST NUMBER. C6) 
jINOICATE THAT WE ARE WITHIN A TEST. 
j SET ERROR TYPE AS FATAL IN ERROR TABLE, 
j SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
jSET ERROR ROUTINE ADDRESS IN ERROR TABLE. 



TNUM 

MOV 
MOV 
MOV 
MOV 
MOV 



> TNUM ♦ 1 
*TNUM,TSTNUM 
*-l,CTRLCF 
tfl.ERRTYP 
4EM0601.ERRMSG 
*ERO201,ERR3LK 



SET THE DUT CSR MASTER RESET (MR) BIT. PERFORM THE SKIP SELFTEST SEQUENCE, 
AND WAIT UP TO 5 SECONDS FOR THE MR BIT TO CLEAR. 



MOV 
MOV 
CLR 
MOV 
MOV 

JSR 

JSR 

BCC 



45000. »R1 

06IT05.R2 

R3 

CSRA.R4 

R2.CR4) 

PC.SKPSTS 

PC.MSLGET 

4$ 



i TIME-OUT VALUE IS 5.0 SECONDS. 

{WAITING FOR MASTER RESET BIT. 

{WAITING FOR BIT TO CLEAR, 

{BIT IS IN THE OUT'S CSR. 

;SET THE DUT MASTER RESET BIT. 

;SK1P THE SELFTEST. 

{WAIT FOR DUT CSRJ1R BIT TO CLEAR. 

{GO REPORT ERROR IF MR DID NOT CLEAR 



{ CHECK THAT THE RX DATA AVAILABLE BIT IS SET. 



BIT *BIT7,(R4) 

BEQ 6$ 



{TEST THE DUT RX . DATA. AVAIL BIT. 
{GO REPORT ERROR IF BIT IS NOT SET. 



J » 



READ CHARACTERS FROM THE DUT RX FIFO AND WAIT FOR RX . DATA. AVAIL TO GO CLEAR 



2$ 



MOV 0600. ,R5 

MOV R4.R3 

MOV (R3V.R0 

MOV CR3 3.R0 

BIT 0BIT7,(R4) 

BcO 60$ 

DEC RS 

BNE 2$ 

BR 8$ 



jALLOW READING 600 CHARS BEFORE ERROR. 

{CALCULATE THE RBUF ADDRESS. 

{READ A CHARACTER FROM THE RX FIFO. 

;TEST THE DUT RX . DATA . AVAIL BIT. 

{EXIT TEST WITHOUT ERROR IF RX .DATA. AVAIL CLR. 

{COUNT THE CHARACTER JUST READ. 

{LOOP IF NOT TOO MANY CHARS READ FROM FIFO. 

{GO REPORT ERROR IF RX, DATA .AVAIL WOULDN' f CLR 



ERROF REPORTS: 



001131 
005651 



155046 4$: 



{REPORT MR 
MOV 
MOV 
ERROR 



BIT WOULD NOT CLEAR AFTER A DUT RESET. 
00601, .ERRNBR \ St T THE ERROR NUMBER 
4EM0202.R1 {SELECT ERROR MESSAGE 

{REPORT ERROR, 



IN ERROR TABLE. 

>>>>> ERROR 00601 



V v \ \ ^ 



TRAP 



C5ERRUR 



CZDHUeO DHU-ll FUNC TST PARTI 
HARDWARE TEST - RDAA 



5355 
5356 

5357 
5358 
5359 
5360 

5361 
5362 

5363 
5364 
5365 
5366 

5367 
5368 



5369 
5370 



026/30 000415 



02673? 
026740 
026744 
026744 
026746 



026750 
026756 



026764 
026764 
026770 
026772 
026776 
026776 
026776 



012767 
012701 

104460 
000406 



012767 
012701 



026762 104460 



012700 
104441 
005067 



104401 



001132 
007637 



001133 
010017 



000340 
153310 



MACRO M1200 



155030 6$ 



155012 8$ 



60$ 



Kll 
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BR 



60$ 



tEXIT THE TEST. 



{REPORT THAT RX .DATA. AVAIL BIT WAS NOT SET AFTER A RESET COMPLETION. 
MOV 40602,, ERRN8R {SET THE ERROR NUMBER IN ERROR TABLE. 
MOV 4EM0602.R1 {SELECT ERROR MESSAGE. 
ERROR jREPORT ERROR. >>>>> ERROR 40602 <<<<* 

TRAP C TERROR 
BR 60$ {EXIT THE TEST. 

;REPORT THAT RX . DATA. AVAIL BIT COULD NOT BE CLEARED BY PURGING ►IFO. 

SET THE ERROR NUMBER IN ERROR TABLE. 
SELECT ERROR MESSAGE. 
REPORT ERROR. >>>>> ERROR 40603 <<<<< 



MOV 

MOV 

ERROR 


40603, .ERi'NBR 
ffEM0603,Ri 


SETPRI 


4PRI07 


CLR 
ENDTST 


CTRLCF 



TRAP 

{DISABLE ALL INTERRUPTS. 

MOV 
TRAP 

{INDICATE THAT WE COMPLETED THE TEST 



L10033; 



TRAP 



C$ERROR 



4PRI07.R0 
C$SPRI 



C$ETST 



SEQ 140 



CZDHUBO DHU 11 
HARDWARE TEST 



FUNC TST 



PARU 

- RDVA 



LI 1 
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^EQ 141 



5572 

5373 
5374 
5375 
5376 
5377 
5378 
5379 
5380 

5381 



5382 

5383 

5301 

5385 

5386 

5387 

5388 

5389 

5390 

5391 

5392 

5393 

5394 

5395 

5396 

5397 

5398 

5399 

5400 

5401 

5402 

5<05 

5404 

5405 

5406 

5407 

5408 

5409 

5410 

5411 

5412 

5413 

5414 

5415 

5416 

54 1 7 

5418 

5419 

5420 

5421 

5422 

5423 

5424 



027000 
027000 
027000 
027000 
027004 

027006 

027014 
027022 
027030 
027036 



02 7044 
027050 
027054 
027056 
027062 
027064 
027070 
027074 



027076 
027100 
027102 



027104 

027110 
027112 
027114 
02/116 
02/120 



027122 

027130 
027134 

027134 

02 7136 



012700 
104441 
000007 
012767 
012767 
012767 
012767 
012767 



012701 
012702 
005003 
016704 
010214 
004 767 
004 76 7 
103012 



012400 
005714 
100016 



012705 
011400 
100027 
005305 
001374 
000416 



01276/ 
012/01 

104460 
000415 



000240 



000007 
177777 
000001 
010202 
016042 



011610 
000040 

153160 

173254 
171070 



153310 
153264 
154/36 
154734 
154730 



SBTTL HARDWARE TEST - RDVA - 

H A*****************************. + + + + .*+*** + * + **+* + + + *+ + * + + * + + + ** + * **#***+***** 

* - RBUF RX DATA VALID BIT TEST - 

* THIS TEST VERIFIES THAT THE DUT RBUF RX DATA VALID BIT IS SET BY THE 

+ INCLUSION OF THE SELFTEST CODES IN THE DUT FIFO AND THAT THE BIT CLEARS 

* AFTER THE FIFO HAS BEEN EMPTIED. 

* 

6GNTST 

T7j j 
j ALLOW LTC INTERRUPTS. 

MOV 4PRI05.R0 
TRAP CiSPRI 
t INCREMENT THE ASSEMBLY TIME TEST COUNTER. 



SETPRI 0PRI05 



TN'UM > 

MOV 

MOV 

MOV 

MOV 

MOV 

SET THE OUT ( 

AND WAIT UP 

MOV 
MOV 
CLR 
MOV 
MOV 

JSR 

JSR 

BCC 



> TNUM ♦ 1 

OTNUM.TSTNUM 

O-l.CTRLCF 

Ol.ERRTYP 

OEM0701,ERP»';. G 

0ER0201,ERR<.LK 



{SET UP THE TEST NUMBER. (7) 
i INDICATE THAT WE ARE WITHIN A TEST. 
;SET ERROR TYPE AS FATAL IN ERROR TABLE. 
I SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
tSET ERROR ROUTINE ADDRESS IN ERROR TABLE. 



A MASTER RESET (MR) 
C 5 SECONDS FOR THE 



BIT, PERFORM THE 
MR BIT TO CLEAR. 



SELF TEST SEQUENCE, 



05000, ,R1 

0BTTC5.R2 

R3 

C3RA.R4 

R2.CR4) 

PC.SKPSTS 

PC.MSLGET 

4$ 



{TIME-OUT VALUE IS 5.0 

{WAITING FOR MASTER RESET BIT. 

{WAITING FOR BIT TO CLEAR. 

iBIT IS IN THE OUT'S CSR. 

;SET THE DUT MASTER RESET BIT. 

j SKIP THE SELFTEST. 

{WAIT FOR DUT,.CSR_MR BIT TU CLEAR. 

{GO REPORT ERROR IF MR DID NOT CLEAR 



CHECK THAT THE RX DATA VALID BIT IS SET 



MOV 
TST 
BPL 



(R4)»,R0 

(R4) 

6$ 



{INCREMENT POINTER TO 
{TEST "IHE DUT RX.DATA 
;G0 REPORT ERROR IF BIT IS NOT SET 



PNT TO DUT 

VALID BIT. 



RBUF REG 



001130 



READ CHARACTERS FROM THE DUT RX FIFO AND WAIT FOR RX .DA FA. VALID TO GO CLEAR 



MOV 
2$ 5 MOV 
BPL 

DEC 
BNE 
BR 



0600. ,R5 

(R4),R0 

605 

R5 

2 5 

a$ 



{ALLOW READING 600 CHARS BEFORE ERROR. 

{READ A CHARACTER FROM THE RX FIFO. 

{EXIT TEST WITHOUT ERROR IF BIT IS CLEAR. 

{COUNT THE CHARACTER JUST READ. 

{LOOP IF NOT TOO MANY CHARS READ FROM FIFO. 

jGO REPORT ERROR IF RX.DATA. VALID WOULDN'T CLR 



ERROR REPORTS: 



001275 
005651 



154640 4*; 



;REPORT MR BIT UUULU NOT CLEAR AFTER A DUV RESET, 



MOV 

MOV 

ERROR 

BR 



00/01. .ERRNBR 
0EM02Q2*R1 



6Q* 



jSE T THE ERROR NUMtil R IN ERROR TABLE. 
{SELECT ERROR MESSAGE. 

{REPORT ERROR. •> > > > > ERROR 00/01 -v., 

TRAP CSERROR 
iEXir THE TEST. 



ha&dwar 



DHU-11 FUNC TST PARTI MACRO M1200 
E TEST - RDVA - 



5425 
5426 
5427 
5428 

5429 

5430 
5431 
5432 
5433 
54 34 

5435 
5436 



5437 
5438 



027140 
027146 
027152 
027152 
027154 



027156 
027164 
027170 
027170 

027172 

027172 
027176 
027200 
027204 
027204 
027204 



012767 
012701 

104460 
000406 



012767 
012701 

104460 



012700 
104441 
005067 



104401 



001276 
010245 



0012 7 7 
010425 



000340 
153102 



154622 Mi 



154604 8$ 



605 



Mil 
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REPORT THAT RX . DATA . VALID BIT WAS NOT SET AFTER A RESET COMPLETION. 
MOV 00702. .ERRNBR {SET THE ERROR NUMBER IN ERROR TABLE. 
MOV 0EM0702.R1 : SELECT ERROR MESSAGE. 
ERROR {REPORT ERROR. >>>>> ERROR 40702 <<<<< 

TRAP CSEkROR 
BR 60$ jEXIT THE TEST. 

:REPORT THAT RX, DATA. VALID BIT COULD NOT BE CLEARED BY PURGING FIFO. 
MOV 00703. .ERRN8R $SET THE ERROR NUMBER IN ERROR TABLE. 



SEQ 142 



MOV 
ERROR 


OEM0703.R1 


SETPRI 


0PRI07 


CLR 

ENDTST 


CTRLCF 



I SELECT ERROR MESSAGE. 
{REPORT ERROR. 



>>>>> ERROR 00703 <<<<< 



TRAP 



{DISABLE ALL INTERRUPTS. 

MOV 
TRAP 

{INDICATE THAT WE COMPLETED THE TEST. 



L 10034; 



TRAP 



C $ ERROR 



#PRIO/,R0 
C*SPRI 



CSETST 



CZDHUtfO DHU 11 FUNC 
HARDWARE TEST 



TST PARTI 
- RLNA 



ni: 



X 
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SEQ 143 



5440 
5441 
5442 
5443 
5444 
5445 
5446 
5447 
5448 

5449 



5450 
5451 
5452 
5453 
5454 
5455 
5456 
5 



SBTTL HARDWARE TEST - RLNA - 



027206 

02 7206 
02 7206 
027206 
027212 

027214 

027222 
027230 
027236 



457 
5458 
5459 
5460 
5461 
5462 
5463 
5464 
5465 
5466 
5467 
3468 
5*^69 
54 70 
5471 
5472 
5473 
54 74 
54 75 
54 76 
54 77 
54 78 
5479 
5480 
5481 
5482 
5483 
5484 
548b 
5486 
5487 
5488 
5489 
5490 
5491 
5492 



027244 
027250 
027254 
02 7256 
027262 
027264 
027270 
027274 



027276 
027300 
027302 
02/304 
02 7306 
027310 
027314 
027316 
027320 
027322 
027326 
027330 



02733? 
027340 
02 7346 
027352 
027352 



oir/oo 

104441 
0C0010 
012767 
012767 
012767 
012767 



012/01 

012702 
005003 
016704 
010214 
004767 
004767 
103016 



005001 
012400 
011402 
010203 
000303 
042703 
020301 
001017 
005201 
020127 
001365 
000423 



012767 
012767 
012701 

104460 



; + 
; + 
:* 
; * 
j* 
; -- 



- RBUF RX LINE NUMBER FIELD TEST • 
THIS TEST VERIFIES THAT THE OUT RBUF RX LINE NUMBER FIELD IS WORKING 
CORRECTLY BY UTILIZING THE SELFTEST CODES WHICH ARE PUT IN THE RX 
FIFO AFTER A BOARD RESET. 



SETPRI 4PRI05 



0002*50 



000010 
177777 
00000 i 
010610 



011610 
000040 

152760 

173054 
170670 



153102 
153056 
154530 
154526 



BGNTST 

T8:: 
{ALLOW LTC INTERRUPTS. 

MOV 4PRI05,R0 

TRAP CJSPRI 

j INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
{SET UP THE TEST NUMBER. C8) 

{INDICATE THAT WE ARE WITHIN A TEST. 
;SET ERROR I YPE AS FATAL IN ERROR TABLE. 
:SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 



TNUM 
MOV 
MOV 
M'..' 



' TNUM ♦ 1 
OTNUM.TSTNUM 
O-l.CTRLCF 
> l.ERRTYP 
*EM0801,ERRMSG 



SET THE OUT CSR MASTER RESET (MR) BIT, PERFORM THE SKIP SELFTEST SEQUENCE, 
AND WAIT UP TO 5 SECONDS FOR THE MR BIT TO CLEAR. 

TIME CUT VALUE IS 5.0 SECONDS. 
WAITING FOR MASTER RESET BIT. 
WAITING FOR BIT TO CLEAR. 



MOV 


45000. ,R1 


MOV 


0BIT05,R2 


CLR 


K3 


MOV 


CSRA.R4 


MOV 


R2.CR4) 


JSR 


PC.SKPSTS 


JSR 


PC.MSLGET 


BCC 


4$ 



IS IN THE OUT 



S CSR. 
RESET 



BIT 



BIT 

SET THE DUT MASTER 

SKIP XHE SELFTEST. 

WAIT FOR DUT CSR MR BIT TO CLEAR. 

GO REPORT ERROR IF MR DID NOT CLEAR. 

READ CHARACTERS FROM THE DUT RX FIFO AND VERIFY THAT THE LINE NUMBERS ARE 

CORRECT. 
EIGHT CHARACTERS ARE READ FROM THE FIFO. 



177760 



000010 



001441 
016136 
005651 



154450 
154426 



CLR 
MOV 
2$: MOV 
MOV 
SWAD 
BIC 
CMP 

BNE 
INC 
CMP 

BNE 
BR 



ERROR REPOPvi'! 

j REPORT MR 
4$: MOV 

MOV 
MOV 

ERPOR 



Ri 

( R4 ) ♦ , RO 

CR4),R2 

R2.R3 

R3 

♦17/760, R3 

R3.R1 

6$ 

Rl 

R1.G8. 

2* 

60$ 



;CLEAR THE LINE COUNTER. 

{INCREMENT POINTER TO r>NT TO THE OUT RBUF REG 

{READ A CHARACTER FROM THE DUT RX FIFO. 



REMOVE ALL BUT LINE NUMBER BITS. 

COMPARE WITH EXPECTED LINE NUMBER. 

GO REPORT ERROR Ih LINE NUMBERS DON'T MATCH. 

INCREMENT THE EXPECTED LINE NUMBER. 
{COMPARE NUMBER OF CODES READ WITH MAX. 
{LOOP UNTIL CODES FOR ALL LINES ARE READ. 
{EXIT TEST WITHOUT ERROR. 



BIT WOULD NOT CLEAR AFTER A DUT RESET, 

SET THE ERROR NUMBER 
ERROR ROUTINE 



00801. ,ERRNBR 

0ER0503.ERRBLK 

4EM0202,R1 



SET 

SELECT 

REPORT 



IN ERROR TABLE. 

« TN ERROR TABLE 



ERROR 
ERROR 



MESSAGE 



>>>•>> ERROR #080 1 



TRAP 



CSERROR 



C/DHUBO 


DHii 11 


fUNC tsr 


PARTI 


MACRO 


HARDWARf 


TEST 




- RLNA 




5493 


027354 


000411 






54*4 










5495 










54** 


027 556 


012767 


001442 


1S4404 


54*' 


027 364 


012767 


016136 


154402 


54*8 


02 73/2 


012701 


010656 




54** 


02 w* 

027 5 7b 


104460 






5500 










5501 


02 MOO 










02 7400 


012 700 


000 340 






027404 


104441 






55,V 


02/40f» 


00506 / 


1±»2<>?4 




5505 


02/412 

02:412 

027412 


104401 
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PACE 107-1 



BR 



601 



itXlT THE TEST. 



6$; 



iREPORT THAT RX LINE NUMBER FIELD IS WRONG FOR SELMEST COOK 



60$ 



MOV 

MOV 

MOV 

ERROR 



SET PR I 



CI R 
ENOTST 



00802. .EPRN8R 

OER05C3.ERRBLK 

<?EM0eO2,Rl 



OPRIO/ 
CTRLCP 



iSfcT THE ERROR Nl*16ER IN ERROR 1 ABl E . 

I SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 

I SELECT ERROR MESSAGE. 

j RE PORT ERROR. >>>>> ERROR 00802 *<<>< 



TRAP 

I DISABLE AL L INTERRUPTS. 

MOV 
TRAP 

I INDICATE THAT WE COMPLETED THE TEST 



L10035i 



TRAP 



CtF.PROR 



OPRIO.'.RO 

CfSPRi 



C*tTST 



SEO 144 



C.'DHUHO DHU U 
HARDWARE Tt- ST 



CL! 



FUNC TST PARTI MACRO M1200 
- BMPCHK 
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SEU 145 



5505 

5506 

550 ' 
5508 
550 1 » 
VjIO 
55 11 
551? 
5515 
5514 
55 IS 

5516 
551? 

5518 



5520 
5521 
5522 
55? 5 
5524 
5525 
5526 
5527 
5528 
5529 
5550 
5551 
555? 
5535 
55 54 
5555 
5556 
555 7 
5558 
5559 
5540 
5541 
554? 
554 5 
5544 



Z>T>H t> 

5M 7 
5548 

5549 

5550 

r>55i 

555? 
5555 
5554 
5555 
V_>56 



->«>a< 



02 7414 
02 7414 
027414 
02/414 
027420 

027422 
02 7450 
02/456 
027444 
027452 



027460 
02 7464 

02 74 70 
02 74 7? 
02 74 76 
027502 



02 7504 
027506 



02 7512 
027516 
02 7522 
027526 



02 ■".-SO 
02 '5 34 
02 7540 
027542 



012 700 
104441 
000011 
012767 
012767 
012767 
012 767 
012767 



012701 
0\2 70? 
005005 
016 704 
004 76 7 
105027 



010214 
004 767 



012704 
004 767 
004 76 7 
105015 



016 702 
012705 
02020! 
001414 



000240 



000011 
177777 
000001 
001605 
010726 



0056 70 
000040 

152544 
170462 



172652 



000 764 

170402 
171014 



152 7 70 
002526 



152674 
152650 
154 522 
154516 
154512 



. SBTTl HARDWARE TEST - 0MPCHK 

j ♦ » *4***#***************#****** >♦♦♦***♦♦♦♦*♦*******♦♦♦♦*♦•**♦♦***♦♦*#** ******* 

i* BMP CHECK TEST - 

THIS TEST IS USED TO VERIFY THAT THE OUT DOES NUT IMMEDIATE! f KAIL 

THE ON BOARD BACKGROUND MONITOR PROGRAM, AND HENCE INvAl IOATE 

SUCCEEDING TESTS. 

THIS TEST LOOKS FOR BMP COOES IN THE UKU FOR A SET PERKJO IMMEDIATELY 

AFTER THE SELF-TEST IS SKIPPED. 

ANY BMP COOES THAT ARE FOUND ARE SAVED ON THE QUEUE AND ARE ALSO 

REPORTED IN THIS TFST . 



I • 
I * 
I* 
I • 
I* 
I ♦ 
I* 

i* 

j . . ***#********#*** ************** ********************************************** 

RGNTST 

T9: : 
I ALLOW LTC INTERRUPTS. 

MOV 0PPIO5.RO 

TRAP GJSPPl 

I INCREMENT THE ASSEMEii r TIME TEST CUitUEH. 
i SET UP THE TEST NUMBER. (9) 

l INDICATE THAT WE ARE WITHIN A TEST , 
j SET ERROR TrPE AS >- A T Ai. IN ERROR TABLE. 
I SET THE. ERROR NUMBER. 
;SET THE ERROR MESSAGE 



SETPRI 0PRI05 



TNUM «- TNUM * 1 

MOV *TNUM,TSTNUM 

MOV •■■l.CTRicr 

MOV *i.ERRTYP 

MOV 00901. .ERRNBR 

MOV *EM0901,ERRM5i; 



\ WAIT UP TO 5 SECONOS fOfl THE DUT MASTER RESET BIT TU CLEAR, 
; IF TIME-OUT OCCURS. THEN EXIT THIS TEST. 

(TIME OUT VALUE IS 5.0 SECONOS. 

jWAITING FOP MAS T ER RESET HIT. 

(WAITING FOP BIT TO CLEAR. 

iBIT IS IN ll-tf OUTS CSR. 

(WAIT FOR DUT CSR .MR BIT fU CLEAR, 

lABORT THE TEST IK MR DID NUT CLEAR, 



MOV 


#5000, ,R1 


MOV 


0BIT05.R? 


CLR 


R? 


MOV 


CSRA.R4 


JSR 


PC. MSI. GET 


OCC 


50 1 



l ♦ 

t RESET THE DUT, SKIP THE. SELF TEST. 

t - 

MOV R?,(R4) 

JSR PC.SKPSTS 

|*WAIT FOR MASTER RESET TO CLEAR, DELAY FOR 500 MILII-SECS BEFORE PURL.INo 
i THE FIFO. 



iSET TME. DUT MASTER RESET BIT, 

iWRUE THE SKIP SELFTEST CODES TU THE OUT. 



MOV 
JSR 
JSR 

BCC 



OSOO. ,R4 
PC.Df LAi 

PC. PL* IKO 
SO I 



j TJMf OUT VAIUE i'S SCO MILL I SECONDS. 

lUAIT FOR BMP TO BEGIN EXECUTION. 

i PURGE THE f IFO. SAVING! AN* BMP COOE*>. 

, ABORT THE TEST IF THE FIFO DID NOT CLEAR, 



; REPORT THE ERROR V AN* BMP CODES WERE FOUND, 



J 



MOv BMPCGP.R2 

MOV 06MPCUB.R5 

CMP R2.R5 

BEO hOI 



GET THE. CONTINTS OF THE POINTER TO THE B M P Q t 

• UE t the; ,tart address o»- the queue. 

j SEE IE THE. POINTER HAS MOVED FROM THl FjA$t , 
{EXIT NO COOES IN THE Olt'UF . 



j THERE IS AT LEAST ONE BMP COOl IN THE QUEUE:. REPORT THE ERROR. 
jREPURI ERROR BMP CODE FOUND IN TEST NN, BMP CUOEiNNNNNM" 



C/DHWO OK J n 
HARDWARh TEST 



5559 
5560 



5561 
55^2 
5563 
5564 
55b5 
5566 



55b 7 
5566 



02/544 
027550 
02/550 
027552 
02 7554 
02 755b 
027^60 

027562 
027570 

027574 
027574 
02 7600 
02 7602 
02760t. 
02 760b 
027606 



t VUC 1ST PARTI MACRO Ml c^OO 
- RHPCHK 

012701 010766 

104455 
001605 
010 726 
017262 
000405 



012767 
004 76 7 



012 700 
104441 
005067 



104401 



001606 
1726 76 



000 540 
152500 



154200 50$ 
60$ 
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MOV 
ERRDK 



BR 

MOV 
JSR 



Cl.R 
ENDTST 



0EM0902.R1 iPASS THE MESSAGF 10 BE REPORTED. 
0901.EM0901.ER9301 i >>>>> ERHQR 00901 <<<<< 

TRAP 



60$ 

0902. .ERRNBR 
PC.TSABRT 

0PRI07 
CTRLCF 



.WORD 
.WORD 
.WORD 



, SF : . T » > > > » ERROR 00902 <<<<«. 
I REPORT NON-TEST RELATED ERROR, 

(DISABLE ALL INTERRUPTS. 

MOV 
TRAP 
I INDICATE THAT WE COMPLETED THF TEST 

L 100361 

TRAP 



C$fRD^ 
901 

F.M0901 
ER9301 



0PHI0 7.R0 

C5SPRI 



C^ETST 



SEQ 146 



CZDHU60 DHU-li FUNC TST 
HARDWARE TEST 



5570 
5571 
55 72 
5573 
5574 
5575 
5576 
557 7 
5578 
5579 
5580 



5581 



5582 

5585 

5584 

5585 

5586 

5587 

5588 

5589 

5590 

5591 

5592 

559r 

5594 

5595 

5596 

5597 

5598 

5599 

5600 

5601 

5602 

5603 

5604 

5605 

5605 

5607 

5608 

5609 

5610 

5611 

5612 

5613 

5614 

5615 

5616 

5617 

5618 

5619 

5620 

5621 

5622 

5623 



027610 
027610 
027610 
027610 
027614 

027616 
027624 
027632 
027640 
027646 



02765* 
027660 
027664 
027666 
027672 
027676 



027700 
027704 
02 7 706 

027712 
027716 
02 7 720 
027724 



027/26 
027734 
027740 



012700 
104441 
000012 
012767 
012767 
012767 
012767 
012767 



012701 
012702 
005003 
016704 
004 767 
103037 



012701 
010214 
004 767 
004767 
1030U 
020127 
003015 



012767 
004 76 7 
000423 



El 2 



PARTI MACRO 
- BMPCHK - 



000240 



000012 
177777 
000001 
011022 
016136 



011610 
000040 

152350 
170266 



000062 

1724 32 
170246 

000050 



001755 
171554 
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SBTTL. HARDWARE TEST • SKSELF - 

+ ******************•****.******************** ********* 

- SKIP SELF-TEST TEST - 
THIS TEST VERIFIES THAT THE OUT SKIPS THE SELF- TEST WITHIN 
TIME ALLOWED, AND THAT THE FIFO CONTAINS THE CORREC r CODES 
COMPLETION. 



SEQ 14 7 



********************** 



THE 
AFTER 



ITS 



SETPRI 0PRI05 



152500 
152454 
154 126 
154124 
154120 



it*****************.***************************-**.*.**********.*******.****.****.* 
BGNTST 

TlOn 
{ALLOW LTC INTERRUPTS. 

MOV 0PRI05.R0 
TRAP CfSPRI 
j INCREMENT THE ASSEMBLY TIME TEST COUNTER, 
j SET UP THE TEST NUMBER. (10) 
I INDICATE THAT WE ARE WITHIN A TEST. 
j SET ERROR TYPE AS FATAL IN ERROR TABLE. 
{SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
j SET ERROR ROUTINE ADDRESS IN ERROR TABLE, 



TNUM -- TNUM ♦ 1 
MOV OTNUM.TSTNUM 
MOV O-l.CTRLCF 
MOV 01,ERRTYP 
MOV 0EM1001.ERRMSG 
MOV OER0503.ERRBLK 



I * 



WAIT UP TO 5 SECONDS FOR THE OUT MASTER RESET BIT TO CLEAR. 
j IF TIME-OUT OCCURS. THEN EXIT THIS TEST. 



MOV 
MOV 
CLR 
MOV 
JSR 
BCC 



05000.. Rl 

06IT05.R2 

R3 

CSRA,R4 

PC.MSLGET 

50$ 



{TIME-OUT VALUE IS 5.0 SECONDS. 

iWAITING FOR MASTER RESET BIT. 

{WAITING FOR BIT TO CLEAR. 

■ BIT IS IN THE DUT'S CSR . 

{WAIT FOR OUT CSR_MR BIT TO CLEAR. 

{ABORT THE TEST IF MR DID NOT CLEAR. 



DETERMINE IF THE DUT TAKES TOO SHORT OR TOO LONG A TIME TO SKIP THE SEl.F TEST 
SET-UP A TIME-OUT OF 50 MILH SECOND, IF MR IS CLEAR IN LESS THAN 10 MILL1 
-SECOND, OR GREATER THAN 50 MILL I SECONDS, REPORT THE ERROR. 



MOV 
MOV 

JSR 

JSR 

BCC 
CMP 

BGT 



050. .Rl 

R2.CR4) 

PC.SKPSTS 

PC.MSLGET 

2$ 

R1.040. 

4J 



{TIME-OUT VALUE IS 50 MILL1 -SECONDS . 

{SET THE DUT MASTER RESET BIT. 

{WRITE THE. SKIP SELFTEST CODES TO THE DUT. 

jWAIT FOR DUT CSR MR BIT TO CLEAR. 

{GO REPORT ERR IF SKIPPING STEST TOOK TOO LONG 

j GO REP ERR IF SELFTEST COMPLETED IN < 10 MS, 



,. I -SECONDS, 
"GOOD" CODES 



SELF -TEST COMPLETED WITHIN 10 MILLI-SEC TO 50 MIL 
VERIFY THAT THE SELF-TEST CODES IN THE FIFO ARE 
SUCCESSFULLY COMPLETED THE SELF -TEST. 

THIS SUBROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 1003 THRU 100 



IE THE OUT 



< < * < 



154034 



MOV 
JSR 
BR 

ERROR REPORTS: 



01003. .ERRNBR 

PC.RSTRPT 

60$ 



{SET ERROR NUMBER TO 1003. 

{CHECK SELF -TEST CODES IN THE FIFO 

{EXIT TEST. 



027742 012767 001751 154020 2% 



♦REPORT SKIP SELF 



MOV 



01001 



TEST TOOK 
.ERRNBR 



TOO LONG 
I SET THE 



ERROR NUMBER IN THE ERROR TABLE 



CZDHU60 DHU-11 
HARDWARE TEST 



5624 
5625 

5626 

562 7 
5628 
5629 
5630 
5631 

5632 
5633 

5634 
5635 
5636 
5637 



5638 
5639 



027750 
027754 
027754 
027756 



027760 
027766 

027772 
027772 
027774 

027776 
030004 

030010 
030010 
030014 
030016 
030022 
030022 
030022 



FUNC TST PARTI MACRO M1200 
- SKSELF - 

012701 011055 

104460 
000414 



012767 001752 154002 45: 

012701 011142 

104460 
000405 

012767 001753 153764 50$ 

004767 172462 



F12 
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MOV 
ERROR 

BR 



0EM1OO2.R1 



60* 



I SELECT ERROR MESSAGE. 
{REPORT ERROR, 

{EXIT ThE TEST. 



>>>>> ERROR 01001 <<<<< 

TRAP C5ERR0R 



;REPORT SKIP SELF-TEST COMPLETED TOO SOON. 



012700 000340 

104441 

005067 152264 



104401 



60$ 



MOV 

MOV 

ERROR 


01002.. ERRNBR 
0EM1OO3.R1 


BR 


60$ 


MOV 
JSR 


01003, .ERRNBR 
PC.TSABRT 


SETPRI 


0PRIO7 


CLR 
ENDTST 


CTRLCF 



{SET THE ERROR NUMBER IN THE ERROR TABLE. 
I SELECT ERROR MESSAGE. 

{REPORT ERROR. >>>>> ERROR 01002 <<<•< 

TRAP C$ERROR 
jEXIT THE TEST. 

{SET ERROR NUMBER. 

{REPORT NON-TEST RELATED ERROR. 



{DISABLE ALL INTERRUPTS. 

MOV 
TRAP 

{INDICATE THAT WE COMPLETED THE TEST 



L10037j 



TRAP 



0PRI07.R0 
C5SPRI 



C*ETSr 



cr- 



*EQ 148 



G 1 



C2DHU80 DHU-ll 


"UNC 1ST 


PARTI 


MACRO M12 


HARDWARE TfcSl 




- SKSELF 


5b41 








564 > 








564 3 








5644 






i 


5645 






• 


5646 






J 


564? 






» 


5648 






• 


5649 






• 


5650 030024 








030024 








5651 030024 








030024 


012700 


000240 




030030 


104441 






5652 


000013 






5653 030032 


012767 


000013 


152264 


5654 030040 


012767 


177777 


152240 


5655 030046 


012767 


000001 


153712 


5656 030054 


012767 


011220 


153710 


565? 030062 


012767 


016136 


153704 


5658 








5659 








5660 








5661 








5662 0300 70 


012701 


011610 




5663 0300 74 


012702 


000040 




5664 030100 


005003 






5665 030102 


016704 


152134 




5666 030106 


004767 


170052 




5667 030112 


103044 






5668 








5669 








5670 








5671 030114 


010214 






56/2 030116 


004 767 


172222 




56 73 






■ 


56 74 






i 


56 75 






• 


5676 






• 


5677 030122 


012701 


000005 




5678 030126 


012702 


020000 




5679 030132 


010203 






5680 030134 


016704 


152102 




5681 030140 


004 767 


170020 




5682 030144 


103020 






568 5 








5684 








5685 








5686 








568 7 








5688 








5639 








5690 030146 


012 701 


000017 




5691 030152 


005003 






5692 030154 


004 76 7 


1 70004 




569 3 030160 


10*012 






5694 030162 


010105 
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SBTTL HARDWARE TEST 

t f *+*+++++*+**++++*****+**"** 

♦ - DIAGNOSTIC FA 

♦ THIS TEST VERIFIES THAT 

♦ CHANGES STATE AS THE ON 

4 

BGNTST 



SEQ 149 



SETPRI 0PRI05 



TNUM ■■ 

MOV 

MOV 

MOV 

MOV 

MOV 

WAIT V? TO 5 
IF time -OUT 

MOV 
MOV 
CLR 
MOV 
JSP 
BCC 



« TNl>M ♦ 1 
OTNUM.TSTNUM 
4-l.CTRLCF 
n.ERRTYP 
4EM1101,ERRMSG 
4ER0503,ERRBLK 

SECONDS FOR THE 
OCCURS, THEN EXI 

45000., Rl 

4BIT05.R2 

R3 

CSRA,R4 

PC.MSLGET 

50$ 



• OFSKST - 

IL BIT, SKIP SELF TEST TEST 

THE DIAGNOSTIC KAIL BIT OF THE OUT, CORRECTED 
-80ARED SELFTEST IS SKIPPED, 

ft**** *****************************& A ^ *********** 

Til:; 

{ALLOW LTC INTERRUPTS. 

MOV 3PR I05.R0 
TRAP CfSPRI 

{INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

{SET UP THE TEST NUMBER. (11) 

j INDICATE THAT WE ARE WITHIN A TEST. 

{SET ERROR TYPE AS FATAL IN ERROR TABLE. 

{SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

{SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 

DUT MASTER RESET BIT TO CLEAR. 
T THIS TEST. 

jTIME-OUT VALUE IS 5.0 SECONDS. 



I WAITING 
{WAITING 



FOR 
FOR 



MASTER 
BIT TO 



RESET 
CLEAR 



BIT 



tBIT IS IN THE OUT'S CSR. 

s WAIT FOR OUT CSR MR BIT TO CLEAR. 

{ABORT THE TEST IF MR DID NOT CLEAR 



RESET THE DUT» SKIP THE SELF -TEST. 



MOV 
JSrt 



R2.CR4) 
PC.SKPSTS 



iSET THE DUT MASTER RESET BIT. 
{WRITE T ME SKIP SELi-TEST CODES 



TO THE DUT 



SET TIME OUT OF 5 MILL. I SECONDS, WAIT FOR DIAG„FAIL BIT 
IF TIME-OUT OCCURS GO REPORT THE ERROR. 



TO SET 



MOV 
MOV 
MOV 
MOV 
JSR 
BCC 



SFT UME-UUT 
IF TIME-OUT 



45, Rl 

4BIT13,R2 

R2.R3 

CSRA.R4 

PC.MSLGET 

4$ 



j TIME OUT VALUE IS 5 MTLLI - SECONDS. 

{WAITING FOR DIAGNOSTIC FAIL BIT. 

{WAITING FOR BIT TO SET. 

{BIT IS TN THE DUT'S CSR. 

{WAIT FOR DUT CSR DF BIT TO CLEAR. 

{IF DIAG FAIL DID NOT SET, GO REPORT ERROR 



OF 15 MILL I-SECS, WAIT FOR 
OCCURS GO REPORT THE ERROR 



VERIFY THE DIAG FAIL BIT 



IN A 



BACK IF THE STATE WAS TRANSITORY 



DIAG JAIL. TO CLEAR. 

STABLE STATE BEFORE CONTINUING. 
USING THE REMAINDER Ct THE 15 



LOOP 

; TIME -OUT 



(: 



MOV 
CLR 
JSR 
BCC 
MOV 



015. ,R1 

R3 

PC.MSLGET 

R1.R5 



jTIME-OUT VALUE IS 15 MU.Ll SECONDS. 

{WAITING FOR BIT TO Cl EAR. 

jWAIT FOR DUT CSR DF BIT TO CLEAR, 

jIF DIAG FAR. OTD NOT CLEAR, GO REP0R1 

{SAVE THE REMAINING TIME OUT VALUE. 



ERROR 



1-1 1 2 
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15-MAR-84 09: L5 PAGE 110-1 



SEQ 150 



HARDWARE 


TEST 




- DF$K« 


5695 


030164 


012701 


00000 J. 


5696 


030170 


052703 


02000C 


569? 


0301*4 


004 767 


167764 


5698 


030200 


103016 




5699 


030202 


010501 




5700 


030204 


000762 




5701 








5705 








5703 








5704 








5705 


030206 


012767 


002115 


5706 


030214 


012701 


011517 


5707 


030220 








030220 


104460 




5708 


030222 


000405 




5709 








5710 


030224 


012767 


002116 


5711 


030232 


004767 


172234 


5712 








5?13 


030236 








030236 


012700 


000340 




030242 


104441 




5714 


030244 


005067 


152036 


5715 


030250 
030250 








030250 


104401 





MOV 


01, Rl 


BIS 


0BIT13,R3 


JSR 


PC.MSLGET 


BCC 


60$ 


MOV 


R5„R1 


BR 


2$ 



,SET TIME-OUT OF 1 MILLI -SECOND. 

{WAIT FOR BIT TO SET. 

I DOUBLE CHECK TO ELIMINATE NOISE PROBLEMS. 

{EXIT IF DIAG..FAIL BIT STT : CLEAR. 

{PASS THE REMAINING TIME~OU< VALUE. 

sLOOP TO CHECK AGAIN. 



ERROR REPORTS: 



153554 4$: 



{REPORT DIAGNOSTIC FAIL BIT BAD. 



153536 50$ 



60$ 



MOV 

MOV 

ERROR 


#1101, ,ERRNBR 
0EM1205.R1 


BR 


60$ 


MOV 
JSR 


01102.. ERRNBR 
PC.TSABRT 


SETPRI 


0PRI07 


CLR 
ENDTST 


CTRLCF 



jSET THE ERROR NUMBER IN THE ERROR TABLE. 
: SELECT ERROR MESSAGE. 

tREPORT ERROR. >>>>> ERRO^' 01101 <<<<< 

TRAP C SERROR 

jEXIT THE TEST. 

;SET THE ERROR NUMBER FOR TSABRT RTN. 
{REPORT NON-TEST RELATED ERROR. 



{DISABLE ALL INTERRUPTS. 

MOV 
TRAP 

{INDICATE THAT WE COMPLIED A TEST. 



L 10040: 



TRAP 



OPRIO/.RO 

C$SPRI 



C$ETST 



11, 



CZDHUBO OKI H 
HARDWARF. TEST 

s;i7 
brie 

5"* 19 

5720 
5721 
57^ 
5 723 



FUNC 1ST PARTI MACRO M1200 
« 5ELFTS 



5 724 
5725 

5726 



5 72? 
5728 
5729 

5 730 

5731 

5732 

5733 

5734 

5735 

5736 

5737 

5738 

5739 

5740 

5741 

5742 

5743 

5744 

5745 

5 746 

5747 

5748 

5749 

5750 

5751 

5752 

5753 

5754 

5755 

5756 

5757 

5758 

5 759 

5760 

5761 

5762 

5763 

5 764 

5765 

5 766 

5767 

5 766 
5769 



030252 

030252 
030252 
030252 
030256 

030260 
C30266 
030274 
030302 
030310 



0303.1C 
030322 
030326 
030330 
030334 
030340 
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SEQ 151 



030342 
030346 
030350 
030354 
030356 
030362 
030364 
030370 
030372 
030376 



030400 
030404 

030406 

030U4 
030420 
030420 



012700 
104441 
000014 
012767 
012767 
012767 
012767 
012767 



012701 
012702 
005003 
016704 
00-1767 
103067 



000240 



000014 
17777/ 
000001 
011273 
016136 



011610 
000040 

151706 
167624 



012701 011610 
010214 

004767 167610 
103034 

012702 011610 
160102 
020227 
002435 
020227 
002441 



000062 
000764 



032714 020000 
001412 

012767 002264 
012701 011517 

104460 



.SBTTL HARDWARE TEST - SELFTS •• 

t *****, + ****, + ***♦#*«.*»#******#.*************** + ***** + **********• + *** + ******** + + 

- SELF- TEST TEST - 
THIS TEST VERIFIES THAT THE DUT'S SELF-TEST EXECUTES WITHIN THE 
TIME ALLOWED, AND THAT THE FIFO CONTAINS THE CORRECT CODES AFTER ITS 
COMPLETION, 



SETPRI OPRI05 



152036 
152012 
153464 
153462 
153456 



***4************** + + **** + ********** + + *+- 4 + **** + ***** + ********* + + + + + * * + ** + + * + 

BGNTST 

T12;: 
I ALLOW LTC INTERRUPTS, 

MOV £PRI05,R0 
TRAP C$SPRI 
INCREMENT THE ASSEMBLE TIME TEST COJNTER. 
SET \JP THE TEST NUMBER. (12? 
INDICATE. THAT WE ARE WITHIN A TEST, 
j SET ERROR TYPE AS FATAL IN ERROR TABLE. 
j SET ERROR MESSAGE ADDRESS IN ERROk TABLE. 
{SET ERROR ROUTINE ADDRESS IN ERROrt TABLE. 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 



- TNUM > 1 
OTNUM.TSTNUM 
O-l.CTRLCF 
Ol.ERRTYP 
*EM12Cl,EHf*MSG 
OER05O3.ERRBLK 



MOV 


05000. ,R1 


MOV 


06IT05,R2 


CLR 


R3 


MOV 


CSRA,R4 


JSR 


PC.MSLGET 


BCC 


50$ 



WAIT UP TO 5 SECONDS FOR T ! ic OUT MASTER RESET BIT TO CLEAR. 
IF TIME-OUT OCCURS, THEN iiXIT THIS TEST. 

TIME-OUT VALUt IS 5.0 SECONDS. 

WAITING FOP MASTER RESET BIT. 

WAITING -"OR BIT TO CLEAR. 

BIT IS I.N THE OUT' S CSR. 
{WAIT FOR OUT.CSR^MR BIT TO CLEAR. 
{ABORT THE TEST IF MR DID NOT CLEAR. 

! DETERMINE IF THE SELF -TEST TAKES TOO SHORT OR TOO LONG A TIME TO COMPLETE. 
; SET-UP A TIME-OUT OF 5 SECOND IF MR IS CLEAR IN LESS THAN 1/2 SECOND, OR 
i GREATER THAN 5 SECONDS, REPORT THE ERROR. 

j TIME OUT VALUE IS 5.0 SECONDS. 
SET THE OUT MASTER RESET BIT. 
WAIT FOR OUT CSR MR BIT TO CLEAR. 
GO REPORT ERROR SELFTEST TOOK TOO LONG. 

CALCULATE OF MS SELFTEST TO COMPLETE. 

SELFTEST SKIPPED? lES. GO REPORT ERROR. 

GO REP ^RR IF SELFTEST COMPLETED IN < 1/2 SEC. 



MOV 


05000. ,R1 


MOV 


R2,(R4) 


JSR 


PC.MSLGET 


BCC 


4i 


MOV 


05000. ,R2 


5LB 


R1,R2 


CMP 


R2.050. 


BLT 


6* 


CMP 


R2.0500, 


BLT 


8$ 



i ♦ 



J •• 



153354 



SELF -TEST COMPLETED WITHIN 1SEC TO 5 SECONDS. 
CHECK THE STATE OF THE DIAGNOSTIC FAIL BIT, REPORT ERROR IF IT IS SET. 

BIT OBIU3,(R4) {DETERMINE IF THE DIAG.FAIL BIT IS CLEAR. 
BEQ 2$ {SKIP ERROR REPORT IF BIT IS CLEAR. 

{REPORT DIAGNOSTIC FAIL BIT BAD, 

MOV 01204. ,ERRNBR {SET ERROR NUMBER TO IN ERROR TABLE. 
MOV 0EM12O5.R1 {SELECT THE ERROR MESSAGE, 
ERROR { ^>>>> ERROR 01204 *k<^ 

TRAP CStRROR 

1 EXIT THE TES1 IF EXTENDED EK'ROR REPORTING HAS NOT BEEN ENABLED 



SfcO«sf l FW TST 



PARTI v MACRO M1200 
• SEI.FTS 
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SEQ 152 



5770 
5771 
5 7 7.? 
5773 
5774 
5775 
57 76 
5777 

5778 
5779 

5780 
5781 
5782 
5783 
5784 
5785 
5786 
5787 
5788 

5789 
5790 
5791 
5792 
5793 
5794 

5795 

5796 
5797 
5798 
5799 
5300 

5801 
5802 
5803 
5804 
5805 
5806 



5807 
5808 



030422 
030430 



030440 
030444 



030446 
030454 
030460 
030460 
030462 



030464 
030472 
030476 
0304 76 
030500 



030502 
030510 
030514 
030514 
030516 

030520 
030526 

030532 
030532 
03053b 
030540 
030544 
030544 
030544 



032767 
001440 



000100 151574 



012767 
004 767 
000432 



012767 
012701 

104460 
000423 



012767 
012701 

104460 
000414 



012767 
012701 

104460 
000405 

012767 
004767 



012700 
104441 
00506 7 



104401 



002265 153330 
171050 



002261 153314 
011321 



002262 153276 
011463 



002263 153260 
011405 



00P2'2 153242 
171740 



000340 
151542 



BIT OBIT06,0PTI0N 
BEQ 60$ 



jE^T WITH TEST FAILURE MESSAGE IF" 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

j DURING THE SOFTWARE QUESTIONS. 



VERIFY THAT THE SELF -TEST CODES IN THE FIFO ARE "GOOD" CODES .IE THE DUT 

SUCCESSFULLY COMPLETED THE SELF -TEST. 

THIS SUBROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 1205 THRU 1209 <<<<<. 



2$: MOV 01205. ,ERRNBR 
JSR PC.RSTRPT 
Ftf 60* 

ERROR REPORTS; 



SET ERROR NUMBER TO 1205, 

CHECK SELF -TEST CODES IN THE FIFO, 

EXIT TEST, 



43 



6$ 



8$ 



50$ 



60$ 



{REPORT SELF-TEST TOOK TOO LONG TO COMPLETE. 

MOV #1201. .ERRNBR jSET THE ERROR NUMBER IN THE ERROR TABLE. 
MOV 0EM1202.R1 {SELECT ERROR MESSAGE. 
ERROR {REPORT ERROR. >>>>> ERROR 01201 <<<<< 

TRAP C$ERROR 
BR 60$ {EXIT THE TEST. 

{REPORT SELF-TEST DID NOT EXECUTE AFTER OUT RESET. 

MOV 01202. .ERRNBR {SET THE ERROR NUMBER IN ERROR TABLE, 
MOV 0EM1204.R1 {SELECT ERROR MESSAGE. 
ERROR {REPORT ERROR. >>>>> ERROR 01202 <<<<< 

TRAP C$ERROR 
BR 60$ {EXIT THE TEST. 

{REPORT SELF-TEST COMPETED TOO SOON, 



MOV 

MOV 

ERROR 

BR 

MOV 
JSR 



01203. .ERRNBR 
0EM1203.R1 



60$ 

91210. .ERRNBR 

PC.TSABRT 



SET THE ERROR NUMBER IN THE ERROR TABLE. 
SELECT ERROR MESSAGE. 

REPORT ERROR. >>>>> ERROR 01203 <<<<< 

TRAP C$ERROR 
{EXIT THE TEST. 

; SET THE ERROR NUMBER FOR TSAORT RTN. 
{REPORT NON-TEST RELATED ERROR. 



SETPRI 0PRI07 



Cl.R 

ENDTST 



CTRLCF 



{DISABLE ALL INTERRUPTS. 

MOV 
TRAP 

{INDICATE THAT WE COMPLETED THE TEST, 



LX0041: 



TRAP 



OPRIO/.RO 

C$SPRI 



CSETST 



K.1.2 
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HARDWARE. T 



EST 



SELFTS 



SEQ 155 



5810 

58ii 
58 12 

5813 
5814 

5815 

58 io 

5813 

58 : i * 

5820 

5821 



5822 
582 5 
5824 

5825 

5826 

582/ 

5828 

582^ 

58 AG 

58 51 

5832 

5633 

5834 

5835 

58 56 

583/ 

5838 

583* 

5840 

5841 

5842 

5843 

5844 

5845 

5846 

584/ 

5848 

5849 

5050 

5851 

5852 

5855 

5854 

5855 

5856 

585/ 

5858 

5859 

5860 

5861 

58'.-,,? 

5863 



3054<k 
03054b 
03054b 
C 30 54b 

030552 

30554 
030562 
030570 
305/6 
030604 
030612 



030620 
030624 
030630 
30632 
03C636 
03064 2 



030644 
030652 
030656 
030662 



0306/0 
050674 
030700 
030704 
030706 
030/12 
030716 



x ' . '*0C 
lo-i441 
000015 
012/6/ 
01276/ 
01276/ 
012767 
01276? 
012767 



012/01 
012702 
005003 
016 704 
004 767 
103064 



01277/ 

012 704 
004/6 7 
012777 



00526 7 
012701 
012702 
005003 
016704 
004/67 
103036 



000240 



000015 
177777 
000001 
011543 
016136 
002425 



011610 
000040 

151404 
167322 



000040 
000051 
16/242 
146314 



153074 
011610 
000040 

151330 
167246 



SBTTl. HARDWARE TEST - STFAIL - 

****+*+*+**++++**+++**+******+ **++++*+*++**+**++++*+**+++++**+++ *********** 

- SELF TEST FAIL TEST - 
THIS TEST VERIFIES THAT THE OUT WILL REPORT SELFTEST ERRORS VIA THE 
FIFO. AND THAT THE DIAGNOSTIC FAIL BIT WILL INDICATE THE ERROR. 
THIS IS ACCOMPLISHED VIA A SOFTWARE 'HOOK' IN THE SELF -TEST, WHICH 
FORCES A "PR0C1 TO RAM ERROR" TO BE PLACED IN THE FIFO. 



SETPRI #PRI05 



151542 
151516 
153170 
153166 
153162 
153150 



********+*+*++***+****+**************************************************** 

BGNTST 

T13: : 
{ALLOW LTC INTERRUPTS. 

MOV frPRI05.R0 
TRAP CJSPRI 
{INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
iSET UP THE TEST NUMBER. (13) 
iINOICATE THAT WE ARE WliHIN A TEST. 
;SE1 ERROR TYPE AS FATAL IN ERROR TABLE. 
j SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
{SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
;SET ERROR NUMBER TO 1301. 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 



- TNUM ♦ 1 
OTNUM.TSTNUM 
*-l.CTRLCF 
#1,ERRTYP 
#EM1301,ERRMSG 
#ER0503»ERRBLK 
#1301. .ERRNBR 



WAIT UP TO 5 SECONDS FOR THE DUT MASTER RESET BIT TO CLEAR. 
IF TIME-OUT OCCURS, THEN EXIT THIS TEST. 



MOV 
MOV 
CLR 
MOV 
JSR 
BCC 



#5000. ,R1 

#BIT05.R2 

R3 

CSRA.R4 

PC.MSLGET 

50$ 



jIIME-OUT VALUE IS 5.0 SECONDS. 

{WAITING FOR MASTER RESET BIT. 

{WAITING FOR BIT TO CLEAR. 

{BIT IS IN THE DUT' S CSR. 

jWAIT FOR DUT_CSR.MR BIT TO CLEAR. 

{GO REPORT ERROR IF MR DID NOT CLEAR 



151370 



151370 



CODE 



THE DUT , DELAY FOR 
TO TBUFFCT REGISTER 



25 
ON 



MIl.LI SECONDS 
CHANNEL 0. 



BEFORE WRITING THE FAIL SELF TEST 



MOV O0ITO5.3CSRA {SET DUT MASTER RESET BIT, SELECT CHANNEL 0, 

MOV #25., R4 {PASS DELAY PERIOD Of-' 25 MIl.LI SECS . 

JSR PC, DELAY {WAIT FOR SELFTEST TO INITIALISE. . 

MOV #146314. BTXBFCA {WRITE THE FAIL SELF-TEST CODE TO TBUFFCT REG 

WAIT UP TO 5 SECONDS FOR THE SELF -TEST TO COMPLETE. 
IF TIME OUT OCCURS. THEN EXIT THIS TEST. 

{SET ERROR NUMBER TO 1302. 

ilIME-OUT VALUE IS 5.0 SECONDS, 

{PASS THE BIT MAP OF THE BIT TO TEST. 

{SET UP THE EXPECTED STATE. 

i BIT IS IN THE DUT' S CSR. 

{WAIT FOR DUT CSR MR BIT TO CLEAR. 

{GO REPORT ERROR IF MR DID NOT CLEAR. 



INC 


ERRNBR 


MOV 


#5000. ,R1 


MOV 


0BITO5.R2 


CLR 


R3 


MOV 


CSRA.R4 


JSR 


PC.MSLGET 


BCC 


50$ 



030720 00526/ 155044 



VERIFY THE DIAGNOSTIC FAIL BIT IS SET. 
REPORT ERROR IF DIAGNOSTIC FAIL BIT IS 



INDICATING 
CLEAR. 



THE ERROR 



INC 



ERRNBR 



• j 



ET ERROR NUMBER TO 1305. 



L12 



C/DHUBO DHU-11 
HARDWARE TEST 



5864 
5865 
586b 
586? 
5868 
5869 
5870 
5871 
5372 
5875 
5874 
5875 
5876 
587/ 
58 78 
5879 
5880 
5631 
5882 
5883 
5884 
5885 
5886 
5887 

5888 
5809 
5890 
5891 
5892 



5893 
5894 



FUNC TST PARTI MACRO M1200 
- STfAIL • 



030724 
030730 



050732 

030736 
030742 

0307*4 

030750 
030752 

030754 
O307o0 
030 764 
030766 
030770 
030772 
030774 
0307 76 
031000 

031004 
031010 
031010 
031012 
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SEQ 154 



032714 
001425 



005267 
012700 
005001 
016704 
011402 
100020 
042702 
12022/ 
001001 
005201 
005300 
001366 
005701 
001010 
005267 

012701 

104460 
000402 



031020 
031020 
031024 
031026 
031032 
031032 
031032 



020000 



012700 
104441 
005067 



104401 



153032 
000010 

151274 



007400 
170231 



152764 
011576 



031014 00476/ 171452 



000340 
151254 



BIT CBIT13,(R4) 

BEQ 10$ 



; CHECK THE 
iGO REPORT 



state; or the diag kail bit. 

ERROR IF DIAG^FAIL BIT CLEAR 



REMOVE THE 8 SELF -TEST CODES FORM THE FIFO, AND VERIFY THAT AT LEAST 
ONE IS A PR0C1 TO RAM ERROR CODE (231). 

I SET ERROR NUMBER TO 1304. 

;SET MAXIMUM READ COUNT. 

{CLEAR THE CORRECT CODE COUNTER. 

i GET ADDRESS OF THE RECEIVER BUFFER REGISTER 
6$: MOV CR4) ( R2 {READ A CODE FROM THE FIFO, 

{GO REPORT ERROR IF THE FIFO IS EMPTY. 

; REMOVE THE LINE. NUMBER FROM THE CODE. 

{IS IT THE CORRECT ERROR CODE?. 

I SKIP NEXT INSTRUCTION, IF NOT A 231 CODE. 

{INCREMENT COUNTER. 
8$: DEC RO {DECREMENT MAX READ COUNTER. 

LOUP IF 8 COOES HAVE NOT BEEN READ. 
WERE ANY 231 CODES FOUND?. 



INC 


ERRNBR 


MOV 


#8. ,R0 


CLR 


Rl 


MOV 


RBUFA.R4 


MOV 


(R4) ( R2 


BPL 


50$ 


BIC 


47400, R2 


CMPB 


R2, #170231 


BNE 


8$ 


INC 


Rl 


DEC 


RO 


BNE 


6$ 


TST 


Rl 


BNE 


60$ 


INC 


ERRNBR 



;REPORT SELF-TEST ERROR 
10$; MOV GEM1302.R1 
ERROR 



YES, THEN EXIT. 
]N0, SET ERROR NUMBER TO 1305 AND REPORT ERROR. 
REPORTING BAD. 

j SELECT ERROR MESSAGE, 
{REPORT ERROR. 



>>>>* ERROR <<<< 



50 J: 
60 J: 



BR 
JSP 



60$ 
PC.TSABRT 



{EXIT THE TEST 



TRAP C$ERROR 



{REPORT NON-RELATED TFST ERROR. 



SETPRi ^PRI07 



CLR CTRLCF 

ENDTST 



{DISABLE ALL INTERRUPTS. 

MOV 0PRIO7.RO 

TRAP C$SPRI 

{INDICATE THAT WE COMPLETED THE TEST. 



L10042: 



TRAP C$ET$T 



Ml 2 
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SEQ 155 



5396 
589 7 
5898 
5899 
5900 
5901 
5902 
5903 
5904 
5905 
5906 
5907 

5908 



5909 

5910 

59U 

5912 

5913 

5914 

5915 

5916 

5917 

5918 

5919 

5920 

5921 

5922 

5923 

5924 

5925 

5926 

5927 

5928 

5929 

5930 

5931 

5932 

5933 

5934 

5935 

5936 

593/ 

5938 

5939 

5940 

5941 

594 2 

5943 

5944 

5945 

5946 

594 / 

594 8 

5949 



031034 
031034 
051034 
031034 
031040 

031042 

031050 
031056 
031064 
031072 



031100 

031104 
031110 
031112 
031116 
031122 



031124 
031126 
031132 
031136 
031142 



031144 
031150 
031154 
031156 
031164 

0311/0 
031174 



012700 
104441 
000016 
012767 
012767 
012767 
012767 
012767 



012701 
012702 
005003 
016704 
004 76 7 
103131 



010214 
004767 
012701 
004 767 
103121 



012705 
012703 
010304 
012767 
012/01 

01 //02 

100077 



000240 



000016 
177777 
000001 
011635 
016136 



005670 
000040 

151124 
167042 



171212 
011610 
167022 



000040 
00014 T 

0025 > i 
011674 

151G50 



SBTTt. HARDWARE TEST - ROMVER - 

♦ ► **** * '.**.******************************** + ** + ** + -*■ + **** + *** + ♦ + ******'** + + + ** + + 
- ROM VERSION TEST - 
THIS TEST VERIFIES THAT THE DUT'S SfcLF-TEST PLACES VALID ROM VERSION 
NUMBERS IN THE FIFO AFTER IT HAS BEEN SKIPPED. THE ROM VERSION NUMBERS 
WILL BE REPORTED (ON THE FIRST PASS ONLY), IF AN AFFIRMATIVE ANSWER 
WAS GIVEN TO THE SOFTWARE P- TABLE QUESTION. 



SETPRI 0PRIO5 



151254 
151230 
152702 
152700 
152674 



BGNTST 

T14:: 

jALLOW LTC INTERRUPTS. 

MOV 0PRI05.R0 

TRAP CSSPRI 

j INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

;SET UP THE TEST NUMBER. (14) 

tTNDCCATE THAT WE ARE WITHIN A TEST. 

I SET ERROR TYPE AS FATAL IN ERROR TABLE. 

j SET ERROR MESSAGE AODRESS IN ERROR TABIE. 

{SET ERROR ROUTINE ADDRESS IN ERROR TABLE, 



TNUM -* TNUM ♦ 1 
MOV 0TNUM.TSTNUM 

MOV 0-l.CTRLC'F 

MOV 01.ERRTYP 

MOV 0EM14O1.ERRMSG 

MOV 0ERO5O3.ERRBLK 



WAIT UP TO 3 SECONDS FOR THE OUT MASTER RESET BIT TO CLEAR. 
IF TIME OUT OCCURS. THEN EXIT THIS TEST. 



MOV 
MOV 
CLR 
MOV 
JSR 
BCC 



03000. t Rl 
08ITO5.R2 
R3 
CSRA.R4 

PC.MSLGET 
50$ 



{TIME-OUT VALUE. IS 3.0 SECONDS. 

{WAITING FOR MASTER RESET BIT. 

{WAITING FOR BIT TO CLEAR. 

{BIT IS IN THE DUT'S CSR. 

;WMIT FOR OUT CSR MR BIT TO CLEAR. 

{ABORT THE TEST IF MR DID NOT CLEAR 



SET THE MASTER RESET BIT, AND SKIP THE SELF TEST 



MOV 
JSR 

MOV 
JSR 

BCC 



R2.CR4) 
PC.SKPSTS 
05000. ,R1 
PC.MSLGET 
50* 



{SET THE MASTER RESET BIT. 

{SKIP THE SELF TEST. 

iTIME~OUT VALUE IS 5.0 SECONDS. 

{WAIT FOR OUT CSR MR BIT TO CLEAR. 

;ABORT THE TEST IF MR DID NOT CLEAR 



RFMOVE CHARACTERS FROM THE FIFO UNTIL. EITHER} 

(A) THE FIFO IS PURGED. GO REPORT THE ERROR. 

(B) THE MAXIMUM TRY COUNTER IS ZERO, GO REPORT JHh\ ERROR. 

(C) PROC l'S ROM. VERSION NUMBER WAS FOUND BEFORE PR0C_2'S 

(D) BOTH ROM VERSION NUMBERS HAVE BEEN FOUND. 



GO REPORT ERROR 



152604 



2$ 



MOV 032., R5 

MOV 099. ,R3 

MOV R3.R4 

MOV 01401. .ERRNBR 

MUV 0EM14O2.R1 

MOV SRBUFA.R2 

BPt \;>t 



i SET MAXIMUM TRY COUNTER. 
SET AN INVALID ROM VERSION NUMBER FOR PROC 1 
SET AN INVALID ROM VERSION NUMBER FOR PROC .2 
SET THE ERROR NUMBER M3 1401. 
SE.lECT MESSAGE TO BE REPORTED IF FIFO EMPTY, 



READ THE NEXT CHAR FROM THE f IFO 
GO REPORT ERROR IF FIFO EMPTY. 



CHECK IF THE READ DATA IS A BMP CODE 



N 1 < 



j 



FUNC TST 
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SEQ 156 



HARDWARE TEST 




- ROMVE 


5950 






5951 031176 


012700 


000301 


595,? 031202 


040200 




5953 031204 


001003 




5954 031^06 


004767 


171064 


5955 031212 


000435 




5956 






595 / 






5958 






5959 031214 


012700 


000201 


5960 031220 


040200 




5961 031222 


001431 




5962 






5965 






5964 






5965 






5966 031224 


032702 


000002 


596? 031230 


001407 




5968 031232 


010204 




5969 031234 


042704 


177603 


5970 031240 


C002<1 




5971 031242 


006004 




597c* 031244 


006004 




5973 031246 


000417 




5974 031250 


010205 




59 75 031252 


042703 


177603 


5976 031256 


000241 




5977 031260 


006003 




5978 031262 


006003 




59 79 031264 


02042 7 


000143 


5980 031T/0 


001016 




5981 






5982 






5983 






5984 






5985 031272 


012701 


011/62 


5986 031276 


012767 


002572 


5987 031304 


000433 




5988 






5989 031306 


005305 




5990 031310 


001327 




5991 031312 


012701 


012035 


5992 031316 


012767 


002573 


5993 031324 


000423 




5994 






5995 






5996 






599/ 






5998 031326 


032767 


000001 


5999 031334 


001431 




6000 031336 


026/27 


15C/50 


6001 031344 


003025 




6002 < 31346 






031346 


010446 




031350 


010346 




031352 


012 7*6 


004154 


031356 


012746 


000003 



MOV 
BIC 

BNE 
JSR 
BR 



03O1.RO 

R2.R0 
A% 

PC.SAVBMP 
8$ 



{SET -UP A BIT MASK OF A BMP CODE. 

jTRY TO CLEAR THE BIT MASK WITH THE READ DATA 

t BRANCH IF NOT A BMP CODE. 

;SAVE THE BMP CODE ON THE QUEUE. 



4$ 



CHECK IF THE READ DATA IS A SELF -TEST CODE. 



MOV 
BIC 
BEQ 



02O1.RO 

R2.R0 

8$ 



SET-UP A BIT 
TRY TO CLEAR 
BRANCH IF IT 



MASK OF A SELFTEST CODE. 
THE BIT MASK WITH THE READ 
IS A SELFTEST CODE. 



DATA 



THE READ DATA IS A ROM VERSION NUMBER, DETERMINE WHICH ONE IT IS. 



6$: 



BIT 

BEQ 
MOV 
BIC 
CLC 
ROR 
ROR 

BR 
MOV 
BIC 
CLC 
ROR 
ROR 
CMP 

BNE 



0BIT1.R2 
6$ 

R2.R4 
0177603, R4 

R4 

R4 

8* 

R2.R3 

0177603, R3 

R5 
R3 
R4.099. 

10$ 



; CHECK THE 
j BRANCH IF 
{SAVE PROC 
j CLEAR ANY 
{CLEAR THE 
{SHIFT THE 



PROCESSOR NUMBER BIT IN THE CODE 
IT IS PROC 1 ROM VERSION NUMBER. 
2 ROM VERSfON NUMBER. 
UNWANTED BITS. 

CARRY BIT. 

CODES ALONG TO GET THE ROM 



{ VERSION NUMBER IN THE LOW 5 BITS. 

ISAVE PROC 1 ROM VERSION NUMBER. 
{CLEAR ANY UNUANTED BITS. 

CLEAR THE CARRY BIT. 

SHIFT THE CODE ALONG TO GET Uit. ROM 
VERSION NUMBER IN THE LOW 5 BITS. 
{CHECK IF WE HAVE RECEIVE PROC .2 ROM CODE 
iGO REPORT BOTH ROM VERSION NUMBERS. 



RECEIVED ROM VERSION NUMBERS OUT OF SEQUENCE. 
IE, PROC l'S ROM VERSION NUMBER FOUND IN THE FIFO BEFORE 



PROC 



;> ' <: 



152464 



8$ 



152444 



MOV 


0Ehi.4O3.Rl 


MOV 


01402. .ERRNBR 


BR 


12$ 


nec 


R5 


BNE 


2$ 


MOV 


0FM1 *04,R1 


MOV 


01403. .ERRNBR 


BR 


12$ 



{SELECT THF ERROR MESSAGE 
{SET THE ERROR NUMBER. 
5 G0 REPORT ERROR. 



TO BE REPORTED 



{DECREMENT THE MAX TRY COUNTER. 

{LOOP TO GET THE NEXT CHAR FROM THt. FIFO. 

{SELECT THE ERROR MESSAGE TO BE REPORTED. 

{SET THE ERROR NUMBER. 

{GIVE UP, GO REPORT ERROR. 

IF THIS IS THE FIK5T PASS, AND SOFTWARE P- TABLE QUESTION WAS ANSWERED YES 
THEN REPORT THE ROM VERSION NUMBERS TO THE OPERATOR. 



150670 10$: 
000001 



BIT 0BITO. OPTION 
BEQ 60$ 

CMP PASCNT.01 
BGT 60 > 

PR1NTB 0EF14G1.R3.R4 



{CHECK ON THE STATE Of THE SOFTWARE SWITCH. 
{EXIT IF NO ROM VERSION PRINTOUT WAS REQUES 
i CHECK IF THIS IS THE FIRST PAS 
{EXIT U RUM VERS H.AVE 
{PRINT THE ROM VERSION 



ED 



REPORTED 



ALREADY BEEN 

NUMBERS, 

MOV R4 , - ( sP ) 

MOV R4, C l -P> 

mov n*- i«nu , 

NOV 05, -(SP) 



ASP) 



1-3 I '. 



C/DHlOO OMU n 
HARDWARE TK>T 

03156c 1 

031564 
051366 

h003 03137,? 

6004 

t»OOS 

fiOO* 

t%oo ; 

n008 



rLWC 1ST PARTI MACRO MliJOO lb MAR M 0^:11) PAlifc ll.Vd 
ROMVER 



b00^ 

r.010 

*011 
f-OU 
*013 
r»0l4 



*015 
6016 



031 5 .'4 

05140.* 
05140^ 
051404 

03140*. 
051414 

0514^0 
0314?0 
0314^4 
0514^6 
0514 V 
0*14V 
03143^ 



010t>00 
104414 
06^706 000010 



01J70O 0OO340 

104441 

00506 7 150654 



104401 



J 



BR 60 i 

fRROR REPORTS? 



IF.XIT THIS TEST, 



MOV 

TRAP 

ADD 



SP.RO 
CIPNTB 
010, SP 



Ol 1 /67 016<?54 15<?372 1<?$: 

104460 
0004 O r > 

01^/6/ OO^S/S IS. 554 SO J: 
004 76 7 mow 



MOV 0ER1401.ERRBLK i SELECT Th* LRROfl REPORTING ROUTINE 

(REPORT ERROR, >>>>> ERROR <<<<< 

TRAP CHRROR 



ERROR 

BR 601 



M()V 0140!>. ,f HRNbR >SET UP ERROR NUMBER I OR TSAHHT RTN. 

JSR PC.TSARRT (REPORT NON TEST REl ATED ERROR. 



tOt: 



SFTPRI OPRIO/ 



ClR CTRLC^ 
ENDTST 



lOISABLE ALL INTERRUPTS. 

MOV 
TRAP 

I INDICATE THAT WE CQMPLEUO THf TEST. 



U0043i 



TRAP 



oPHIO/.RO 
CISPRI 



C^ETST 



1EU 157 



c 



1 4 



C/DMUK) l)H>' 
HARDWAPF TF. 



r.018 

60. V 
6021 
6022 
602 < 
?»024 
6025 
6026 
602 '.' 
6028 
t>02*# 



11 
ST 



FUNC TST 



6030 



6051 
603.;' 
6033 
6034 

6035 
6056 
n03* 
60 SH 
60 V* 
6040 
♦►04 1 
604 J 
604 5 
6044 
6045 
6046 
604 / 

604 M 
604** 
r>050 
6051 
6052 

605 5 
6054 
6055 

6056 

605 / 
60SH 
60 5' # 
6060 
6061 

6062 

606 3 
6064 

6065 

6066 

606 / 

606 W 
606'* 
60 /O 

eon 



0314 54 
(><14 54 
0514 54 
051454 
031440 



03144? 
51450 
031456 
051464 
0314. V 
031500 



r ,lS06 
031512 
031516 
31520 
051524 
031530 



51532 
031536 



0*1544 
31550 
031554 



DM 556 
0315*,,-' 

031566 



012700 
104441 

00001/ 
012/6/ 
012/6/ 
012/67 
012 76' 
012/6/ 
012767 



012701 
012702 
005003 
016/04 
004 /6 / 
103115 



P.«R ! 1 
- CSRB4 



000240 



00001/ 
1///// 
000001 
002/35 
012155 
016136 



011610 
00OO40 

150516 
166550 



017/00 
0*2/00 
0014/7 



00526 / 
012/01 
004 /(> ' 

103470 



1504/2 
000020 



I5 t '.'06 
0125,-4 
166506 
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150654 
150630 
152502 
1522/6 
1522/2 
152266 



00526/ 152252 

012~'77 000060 150476 



J ♦ 
i * 
i • 
i • 

i * 
i * 
i * 
I* 



CSR 3IT 4 TEST - 
THIS TEST VERIFIES THAT WHEN THIS BIT 15 SI". T (AT THt 5AM! T I Ml. 
A5 MASTER RESET) THE OUT REMAINS INACTIVE WITH THE MASTER RESET 
BIT SETi ANO WHEN CSR BtT 4 15 SUBSEQUENTLY CIEAR^D, THf. ROARP 
Bl COMES ACTIVE AND REPORTS SIX SKIP SEUTEST COOES IN THE RXMR). 
AN* BMP CODES FOUND IN THF FIFO ARE SAVED TO BE MEPOMTF IATEW. 



BfiNTST 

lAU.OW ETC INTERRUPTS, 



T15:: 



SETPRI 0PRI05 



MOV 
TRAP 



*PRI05 # R0 

CtSPRt 



TNUM •- fNUM ♦ I 

MOV OTNUM.TSTNUM 

MOV t.CTRLCF 

MOV •l.fcRRTYP 

MOV *1501. ,ER*N6R 

MOV *EM1501,F.mPM51> 

MOV 0ERC503.FRRULK 



I INCREMENT THE ASSMHl t TIME TEST COUNTER. 

iSt T UP THt TEST NUMBER. 

I INDICATE THAT WE ARE WUHIN A UST. 

I SET ERROR TiPE AS FATAL IN I RROR TABLE, 

I SET THt ERROR NUMBFR TO i r .0i. 

(SIT THf F RROR MTSSAt.E AQDR . 

I SET THE ERROR REPORTING ROUTINE. 



i WAIT FOP THE! MASTER RESET BIT TO CLEAR, RFPORT THf ERROR IF IT FAILS 
j TO CLEAR, 



J 



MOV 


$5000. ,R1 


MOV 


♦6IT05.R2 


CLR 


R3 


MOV 


CSRA,R4 


JSR 


I'C.MSLOOP 


BCC 


'•Of 



iSET THt TIME -OUT VAl UE Of 5 SEC. 

lINOiCATF TO TEST BIT S. 

I INDICATE TO TEST FOR BIT Cl EAR. 

jINOICATt TO TEST THE CSR REl,. 

,WAIT F OR THF BIT TO Cl.FAR 

i JUMP TO REPORT ERROR I* BIT FAILED TO CLEAR. 



i • 



i SET ^^ MASTER RESET AND CSR BIT 4 FJIT' , A NO THEN WAIT 5.5 SEC5 TO ENSURE 
t THAT THE MR BIT DOESN'T CLEAR, 



INC 
MOW 



W.O.aCSRA 



jVERIFl THAT CSR BIT 4 T S SET 

t - 

MOV WC'.RA.RO 

BTT OBI T04.R0 

HIU 40$ 



iSfcV lHf_ ERROR NUM6FH TO 1502 . 
{RESET THE BOARO WITH HIT 4 SET, 



I RE AD TmF fSR. 
iTFST BIT 4, 

{EXIT WITH ERROR IF THE BIT JS CLEAR. 



i 



iWAlT 



SFC0ND5 F OR '-Hi MR BIT TO Cl F AR . 



INC 


FRRNBR 


MOV 


05500, ,W1 


J-jR 


PC.MSLOUP 


UC5 


40$ 



1 SI T THF ERROR NUMBER TO 150V 

1 Si I THE TIME OUT VAL.IIE OF 5.5 \t O- . 

I WAIT > UH THF MA 1 , TIM RF i; E ' BIT TO CM -W . 

tREPORT THE ERROR II' THE MR BIT CLEARED. 



Mim& m* 



1 F UNC 1ST PA 



(&B4 



*0 .V 
60 *4 

60 /5 
60/6 
t»o ,' 7 

60 "fl 

».o:*> 

60 WO 
hOF.l 

*0K5 
6084 

6085 

60*16 

nO.H'7 

608 >l 

hO ( >0 
6(V> I 

609 J 
6095 
f>094 
6095 
60^*6 
h09; 
6098 
6099 
6100 
6101 
6102 
6105 
6104 
6105 
6106 
610/ 
*108 
6 1 09 
M 10 
61U 
6112 
M 1 3 
6114 
6115 
6116 
611 / 
6118 

6119 
6120 
6121 

61.^2 

61.M 
6124 

M2S 
6126 
61c?/ 



0515 74 

0*1600 
051604 



051610 
051614 
051620 
031624 



051626 
05165.' 
051656 
031642 



01/705 

042 705 
01057 7 



15044»» 

000020 
15043J 



OOVh/ 152154 

01 //OS 150422 

52 '05 000020 
001053 



00526 / 
012/01 
004 76 / 
103044 



IV 156 
000 /64 
166436 



31644 
0516 V 



012 76,' 

0WV01 



017126 
015241 



051 6*.6 012 / 04 000006 



031662 

051670 
516/4 
0516/6 
051/00 
031 704 
031/10 
051/12 
051/14 
051720 

031 U'J 
031/26 



051 7 50 
031/34 
031734 



0317*6 
051/44 

031 74*j 
051/50 



012/6/ 
01 //02 
1000 3 5 
01020? 
042/05 
012/05 
040305 
001003 
004 75 7 
000 760 

02052/ 
001407 



002/42 
150550 



17 7400 
000301 



170356 
000203 



00526/ 152034 
104460 



52 76 7 000100 

001411 



005 304 
Q01544 
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'>FQ 159 



150260 



{ CLEAR CSR niT 4 AND VERIFY THAT THE MA5TFR RESET BIT ALSO CLEARS. 



MOV 
HIC 
MOV 



0C5RA.R5 

<?HIT04 ( RS 
R5.BCSRA 



(READ THF CSR. 
i CLE AH BIT 4. 

{RESTORE THF CONTENTS OF THF CSR. 



I VERIFY THAT CSR HIT 4 CLEARED. 

INC ERRNOR 1 5E T THE ERROR NUMBER TO 1504. 

UCSRA.R5 



MOV 
BIT 
BNE 



0EUT04.R5 
401 



iRFAD THF CSR. 

I M ST BIT 4, 

{BRANCH AND REPORT ERROR IF 



itT. 



{WAIT FOR THE MR BIT TO CLEAR, 



} 



INC 
MOV 
J".R 
BCC 



CRRNGR 
0500. ,R1 
PC. MSI. OOP 
40* 



j SET THt ERROR NLHNEH TO 1505. 
I SET A TIME -OUT OF 1/2 SICS, 
jUAII FOR THE MR Oil TO CLEAR, 
i JUMP ANO REPORT ERROR, 
, MR BIT FAILED TO Cl FAR. 



{ READ SIX CHARACTERS FROM THE RXf'IF'O ANO VERIFY THE f APE iSK IP - StLF TEST 
$ COOLS, SAVE ANt BMP CODES FOUND TO BE REPORTED LATER. 

»5ET UP THE ERROR ROUTINE. 

(SET THE ERROR MESSAGE , 

i "IMPROPER SELF-TEST CODE FOUND' . 

(SET THE NUMBER Of" CHAR", TO READ. 



152100 2$ 



4$ 



J 



MOV 


0ER9OO8.ERRBLK 


MOV 


0EH9024.R1 


MOV 


06. ,R4 


MOV 


01506. >ERRNBR 


MOV 


URBUf A.R2 


HP! 


SO* 


MOV 


R2.R5 


BIC 


0177400.R3 


MOV 


0501, R5 


HIC 


R3.R5 


HNf 


AS 


JSR 


PC.SAVBMP 


BR 


2* 


CMP 


R3.0203 


UEO 


6$ 



(SET THE ERROR NUMBER (0 l r »06. 

jRFAD A CODE FROM THF RXFIFO, 

I E. X I T WITH ERROR IF THE FIFO IS EMPTf. 

I COP* THE COOE. 

t CLEAR THE LINE NUMBER AND ERROR HAGS. 

j SET THE BMP COOE MASK, 

I CHECK IF THE COOE IS A BMP CODE. 

|AV0;0 SAVING THE BMP CODE IE IT ISN'T. 

jSAVF It* BMP CODE. 

{AVOID COSTING THIS CODF , ANO BRANCH 

i TO READ MORE DATA FROM THE RXKHO. 

I IS THE. COOF A SKIP St I F ft ST ? 

: BRANCH W AVOID THE ERROR IF IT IS, 



j REPORT UNEXPECTED.) SELF' TEST CODE KOUNO. 

JNC FRRNHR j SE T THE ERROR NUMBER TO 1507. 

ERROR {REPORT THE ERROR, 

i * 



TRAP 



C 5 ERROR 



{IF E>TENOFD ERROR REPORTING MAS NOT BEEN ENABLED THEN EXIT 
{THE TEST WITH f Mt TEST LAHORE Mt SSAGE . 

I 

H!l 0HI106, OPTION I MAS EXTENDED ERROR REPORTING BEEN RH?UEST3 

ME Q 60$ il.xlT THF TEST IF IT HASN'T. 



6H 



DEC 
BNE 



R4 
21 



jOkCFUMENT THE CODF. COUNT. 

i BRANCH AND READ ANOTHER COUL U NOT All 



HI < 



wrnwi* 1 



j 
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SR(" 



CSRB4 



SEU 160 



bl08 








bu:*» 


031 752 


00040b 




bl30 








6151 








MV 








bl33 








bl34 








*135 








hi 36 








613/ 


031754 


01<?701 


012203 


hi 38 








bl39 


031/60 








031 /bO 


1044b0 




6140 


031762 


00040? 




6141 








ol4,J 








bl4 3 








bl44 


031764 


004 767 


1 7050c? 


6145 








6146 


0317/0 


00506/ 


150312 


614/ 








6140 


031/74 
031/74 








051774 


104401 





br 



601 



j HAVE BEEN READ. 

lOTHFRWISE, EXIT THF. TEST, THF. OUT HAS PASSED 

iTHIS TEST. 



5 REPORT THE FRROR "CSR BIT 4 BAD" AND EXIT THIS TEST. 



iSFT UP THF. EXTENDED ERROR MESSAGE AS, 
\ "CSR BIT 4 BAD". 
I REPORT THE ERROR. 

,RAP CSERROR 
lEXIT THE TEST. 



40$ j MOV 0EM1502.RI 

ERROR 

BR 60$ 

i ♦ 

j REPORT A NON -RELATED TEST ERROR. 

50$: JSR PC.TSABRT jRFPORT THE ERROR. 

60* j CLR CTRLCE j INDICATE THAT WE ARE NOT WITHIN A TEST. 

ENDTST 



L 10044: 



TRAP C$ETST 



C^DHUBO DHU , 
HARDWARE TtS 



1 F'UNC TST 



I ■ 1 3 



PARTI 

- reg 



WRW 
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SF.Q 161 



6150 
6151 
6152 
6153 
6154 
6155 
bl56 
6157 
6158 
615* 

b!60 



6161 
6162 
616? 
6164 
6165 
6166 
6167 
6168 
6169 
6170 
6171 

6172 

6173 
6174 
6175 

6176 
6177 
6178 
6179 
6180 
6181 
618? 
6183 
6184 
6185 
6186 
618/ 
6188 
6189 
6190 
6191 
6192 
6193 
6194 

6195 

6196 
619? 
6198 
6199 
o200 
6201 
6202 



031776 
031776 
031776 
031776 
032002 

032004 
032012 
032020 
032026 
032034 
052042 
032046 
032052 
032056 



032062 
032066 
032070 



032074 
032100 
032104 
032110 
032112 
032114 
032120 
032122 

032124 
032132 
032134 
032136 
032136 



032140 
032146 

032150 
032152 



012700 
104441 
000020 
012767 
012767 
012767 
012767 
012767 
005067 
012700 
004767 
005067 



004 76 7 
103402 
000167 



005267 
012702 
016704 
010214 
011401 
042701 
020102 
001412 

01276/ 
005003 
005005 

104460 



032 767 
001433 

005 30? 
002356 



000240 



000020 
177777 
000001 
003101 
012304 
150414 
002464 
165746 
150222 



167270 
000142 



151670 
000017 
150132 



177760 



150312 
150266 
151740 
151734 
151730 



BGNTST 




SETPRI 


0PRIO5 


TNUM « 


- TNUM ♦ 1 


MOV 


OTNUM.TSTNUM 


MOV 


••l.CTRLCF 


MOV 


Ol.ERRTYP 


MOV 


01601. .ERRNBR 


MOV 


0EM1604.ERRMSG 


CLR 


ERSMRF 


MOV 


OERCNTB.RO 


JSR 


PCCLR16U 


CLR 


EXOERR 



016416 151642 



, SBTTL HARDWARE TEST - REGWRW - 

+ * *** + * + **** + + + ** + **** + + ** * + ** + + *«** + * + **«- + + * + ** + + + + + + ** + *** + + + + + + + * + * + * + + * + + 

♦ - DEVICE REGISTER WORD ACCESS READ ANO WRITE TEST - 

* THIS TEST VERIFIES THAT THE DEVICE REGISTERS CAN BE READ AND WRITTEN 
j* CORRECTLY USING WORD ACCESSES. 

j* 

T16: : 
{ALLOW THE LTC TO INTERRUPT. 

MOV V>PRI05,R0 
TRAP CJSPRI 
j INCREMENT THE ASSEMBLY TIME TEST COUNTER, 
j SET UP THE TEST NUMBER. (16) 
{INDICATE THAT WE ARE WITHIN A TEST. 
j SET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 
j SET UP ERROR NUMBER IN I HE ERROR TABLE. 
{SET UP ERROR MESSAGE TOR TEST IN ERROR TABLE, 
{CLEAR THE ERROR SUMMARY FLAGS. 

;CLEAR THE ERROR COUNTER TABLE. 
;CLEAR THE "EXIT ON ERROR" FLAG 

RESET THE DUT TO A KNOWN STATE. 00 NOT REMOVE THE STATUS CODES FROM THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERRORS >>>>> 1601 <<<<<, 

{RESET THE DHU- 11. REPORT ANY ERRORS FOUND. 
{FATAL RESET ERROR? NO. CONTINUE WITH TEST, 
{YES. EXIT THE TEST, 

VERIFY READ/WRITE CAPABILITY T 

{SET THE ERROP REPORT NUMBER TO 1602, 
{SET LOOP COUNT. 
{GET CSR ADDRESS. 
2$: MOV R?,(R4) , WRITE COUNT TO CSR. 

jREAD BACK THE. CONTENTS OF THE CSR 
j MASK OUT ALL BUT THt I NO. ADR. REG * IEl.1). 
jCHECK FOR CORRECT DATA WRITTEN/READ, 
j IS EXPECTED DATA BAD? NO, SKIP ERROR REPORT, 
{REPORT "BAD BIT(S) IN DEVICE CSR REGISTER FOR LINE CD)." 

MUV OERltoOl.fcRRBLK {SELECT THE PROPER ERROR REPORT ROUT INI, 
CLR R^ {SET OFFSET TO TO CAUSE REPORT OF CSR REG. 

CLR R5 {CAUSE REPORT OF LINE 0. 

ERROR { >>>>> ERROR 1602 <<<<< 

TRAP C J ERROR 

EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN REQUESTED, 



JSR 


PC.RE3ETT 


RCS 


. *6 


J MP 


601 


READ/WRITE CAPABI 


INC 


ERRNBR 


MOV 


017, R? 


MOV 


CSRA.R4 


MOV 


R?,(R4) 


MOV 


CR4).R1 


BIC 


$1 7/760.R1 


CMP 


R1.R2 


BEQ 


4* 



000100 150056 



4$: 



BIT rtBIT06.0PTION 

Hi : Q 60$ 

DEC R? 

BGE. 2$ 



{HAS EXTENDED ERROR BEEN REQUESTED ? 
{EXIT THE TEST IF IT HASN'T. 

{OfCREMtNl LOOP COUNT IND, ADD. REG ADDREv . 
{LOOP BACK TO TEST NEXT ADDRESS If NOT DONE. 



CZDHUCO DHL) 11 
HARDWARE TEST 



t>203 
6204 
6205 
b206 

620 7 

6208 

t>209 

6210 

6211 
6212 
6215 
o214 
6215 
621b 
621 ? 
6218 



032160 
032162 
032166 



0321/2 
032176 



6220 

6221 

6222 

6223 

6224 

6225 

6226 

6227 

6228 

622^ 

6230 

6231 

6232 

6233 

6254 

6235 

6236 

623« ? 

6238 

6239 

6240 



TUNC TST 



032200 

32206 
032210 
032212 



032216 
032222 



032224 
032232 
032236 
032242 
032242 
032242 



005267 
005003 
012/04 
004 767 



00576/ 
001017 



012767 

005003 
005404 
004767 



00576 7 
001005 



012767 

004767 
005067 



104401 



G 1 5 



PARTI MACRO 
- REGWRW 



151610 

000002 
166704 



150106 
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WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS Of ALL REGISTERS ON ALL 
ACTIVE LINES. BEFORE WRITING EACH PATTERN, CLEAR ALL THE BITS. 
REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1603 - 1605 <<<<< 

{SET THE ERROR NUMBER TO 1603. 

{INDICATE THAT WORD ACCESSES ARE TO BE USED. 

I INDICATE R/W ACCESS, CLEAR FIRST. 

I WRITE AND VERTEY OATA PATTERNS. 

EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING KAS 
NOT BEEN REQUESTED, I.E. EXOERR IS NOW -ZERO. 



SEQ 162 



INC 


ERRNBR 


CLR 


R3 


NOV 


42, R4 


JSR 


PC, REGTST 



l * 



TST 
BNE 



EXOERR 
60$ 



j IS THE "EXIT ON ERROR" FLAG SET ? 
lEXIT IE IT IS. 



003106 151562 



166660 



WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS 01- ALL REGISTERS ON All 
ACTIVE LINES. BEFORE WRITING EACH PATTERN. SET ALL THE BITS. 
REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1606 - 1608 <<<<< 



MOV 01606. , ERRNBR 

CLR R3 

NEG R4 

JSR PC, REGTST 



I SET UP ERROR NUMBER FUR REGIS I ROUTINE. 
INDICATE THAT WORD ACCESSES ARE TO BE USED. 
INDICATE R/W ACCESS, SET FIRST. 
WRITE AND VERIFY DATA PATTERNS. 



EXIT THE T£ST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED, I.E. EXOERR IS NON ZERO. 



150062 



TST 
BNE 



EXOERR 

60$ 



;IS THE "EXIT ON ERROR" FLAG SET ? 
;EXIT If IT IS. 



PRINT ERROR SUMMARY REPORTS IF NECESSARr. 

THE FOLLOWING ROUTINE REPORTS ERRORS WITH NlMBER >>>>> ERROR o 1609 <<<<< 



003111 
167072 
15C044 



151536 



60$: 



MOV 


01609. , ERRNBR 


JSR 


PC.REPSMR 


CLR 


CTRLCF 


ENOTST 





;SET UP ERROR NUMBER » OR NEXT RTN. 
iRfPORT ERROR SUMMARY IE NECESSARY. 
t INDICATE THAT WE COMPLETED THE TEST. 



L10045j 



TRAP 



CiLTST 



5 



C/DHUBO DHU-11 
HARDWARE TEST 



e>242 
6243 
6244 
6245 

6246 
624 7 
6248 
6249 
6250 
6251 



FUNC TST 



625? 



6253 
6254 

6255 
6256 
6257 
6258 
6259 
6260 
6261 
6262 
6263 
6264 
6265 
6266 
6267 
6268 
626^ 
6270 
6271 
62/2 
627 3 
6274 
62/5 
6276 

627 7 
6278 
62/9 
6280 
6281 
6282 
6283 
6284 
6?eV> 
6286 

628 7 
6288 
6289 
6290 
6291 
6292 
6293 
6294 
o295 



032244 
032244 
032244 
032244 
032250 

032252 

032260 
032266 
032274 
032302 
032310 
032314 
032320 
032324 



032330 
032334 
032336 
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SEQ 163 



032342 
032350 
032352 
032356 



032362 
032366 



012700 
104441 
000021 
012767 
012767 
C12767 
012767 
012767 
005067 
012700 
004/67 
005067 



000240 



000021 
177777 
000001 
003245 
012360 
150146 
002464 
165500 
147754 



004 76/ 167022 

103402 

000167 000064 



012/6/ 
005003 
012704 
004 767 



005 /6 / 
001017 



150044 
150020 
151472 
151466 
151462 



.S3TTI. HARDWARE TEST - REGWRM 

• , «. **«*** + .' ***^* + ****** ************* ****#*************,j******* + ***#**** + ****** 

j- - DEVICE REGISTER WORD ACCESS READ/MODIFy/WR.TTE TEST 

; ♦ 

j* THIS TEST VERIFIES THAT THE DEVICE REGISTERS CAN BE WRITTEN CORRECTLY 

j* USING WORD READ/MODIFY/WRITE ACCESSES. 

;♦ 

: . . *************************************************************************** 



T 1 7 : : 
j ALLOW THE LTC TO INTERRUPT. 

MOV OPRI05.R0 

jr/\P CfSPRI 
{INCREMENT THE ASSEMBLY TIME TEST COUNTER* 
i SET UP THE TEST NUMBER. (in 
{INDICATE THAT WE ARE WITHIN A TEST. 
{SET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 
{SET UP ERROR NUMBER IN THE ERROR TABLE. 
{SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 
I CLEAR THE ERROR SUMMARY FLAGS. 

{CLEAR THE ERROR COUNTER fABl E . 
{CLEAR THE "EXIT ON ERROR" FLAG 

RESET THE DUT TO A KNOWN STATE. DO NOT REMOVE THE STATUS CODES FROM THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERRORS >>>>> 1701 <<<<<. 

{RESET THE DHU-11. REPORT ANY ERRORS FOUND. 
{FATAL RESET ERROR? NO, CONTINUE WITH TEST. 
{YES. EXIT THE TEST. 

THE READ/MODIFY/WRITE CAPABILITY TO INDIRECT ADDRESS FIELD OF CSR IS 
NOT TESTED THIS THIS FORM OF ACCESS IS ILLEGAL. 



BGNTST 




SETPRI 


0PRIO5 


TNUM * 


" TNUM ♦ 1 


MOV 


OTNUM.TSTNUM 


MOV 


# l.CTRLCF 


MOV 


01.ERRTYP 


MOV 


#1701. .ERRNBR 


MOV 


#EM1701,ERRMSG 


CLR 


ERSMRF 


MOV 


4ERCNT8.R0 


JSR 


PC.CLR16W 


CLR 


EXOERR 



J - 



JSR 


PC.RESETT 


BCS 


. *6 


JMP 


60$ 



{ WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL REGISTERS ON All 
j ACTIVE LINES USING R/M/W. BEFORE WRITING EACH PATTERN, CLEAR ALL THE BITS 



REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1703 



1705 <<<<< 



003247 151420 

000001 
166514 



14 7 716 



{SET THE ERROR NUMBER TO 1703. 
{INDICATE THAT WORD ACCESSES ARE TO BE USED 
{INDICATE R/M/W ACCESS, CLEAR f IRST. 
{WRITE AND VFRTFY DATA PATTERNS. 

EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED, I.E. EXOERP IS NON-ZERO. 



MOV 


01703. ,ERRNBR 


CLR 


R3 


MOV 


#1, R4 


JSR 


PC. REGTST 



TST 

ONE 



EXOERR 
60 * 



lIS THE "EXIT ON ERROR" FLAG SET 
{EXIT TF IT IS. 



WRITE. AND VERIFY 16 DATA PATTERNS TN All USED B" T S Of ALL REGISTERS ON All 
ACTIVE LINES USING R/M/W. BH ORE URIUNG EACH FA! TERN, St I ALL THt HI!:.. 
REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>^ ERROR 1706 • 1708 *<**< 



113 
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HARDWARE TEST - REGWRM - 



SfcQ 164 



6296 








6297 


032370 


01276; 


003252 


6298 


032376 


005003 




6299 


032400 


005404 




6300 


032402 


004 767 


166470 


630i 








6302 








6303 








6304 








6305 


032406 


00576 7 


147672 


6306 


032412 


001005 




6307 








6708 








6309 








6310 








6311 








6312 


032414 


012767 


003255 


6313 


032422 


004 76 7 


166702 


6514 


032426 


005067 


147654 


6515 


0324 52 
032432 








032432 


104401 





151372 



j SET UP ERROR NUMBER FOR REGTST ROUTIM. 
{INDICATE THAT WORD ACCESSES ARE TO BE USED. 
jINDICATE R/M/W ACCESS, SET TIRST. 
i WRITE AND VERIFY DATA PATTERNS. 

EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED.- I.E. EXOERR IS NON-ZERO. 



MOV 


41706, .ERRNBR 


CLR 


R3 


NEG 


R4 


JSR 


PC, REGTST 



TST 
BNE 



EXOERR 
60$ 



iIS THE "EXI1 ON ERROR" FLAG SET ? 
jEXIT IF IT IS. 



151346 



PRINT ERROR SUMMARY REPORTS IF NED iSARY . 

THE FOLLOWING ROUTINE REPORTS ERRORS WITH NUMBER >>>>> ERROR 1709 <<<<< 



60$; 



MOV 
JSR 

CLR 
ENDTST 



41709. .ERRNBR 

PC.REPSMR 

C'TRLCF 



(SET UP ERROR NUMBER FOR NEXT HTN. 
iREPORT ERROR SUMMARY IV NECESSARY. 
j INDICATE THAT WE COMPLETED THE TEST. 



110046: 



TRAP 



CJETST 



J 13 



CZDHUBO DHU11 
HARDWARE TEST 

6317 

6318 
6319 
6320 
6321 
6322 
6323 



FUNC TST 



6325 
6326 

t>327 



6328 

6329 

6330 

6331 

6332 

6333 

6334 

6335 

6336 

6337 

6338 

6339 

6340 

6341 

6342 

6343 

6344 

6345 

6346 

634 7 

6348 

6349 

6350 

6351 

6352 

6353 

6354 

6355 

6356 

6357 

6358 

6359 

6360 

6361 

6362 

6363 

6364 
6365 
6366 
6367 
6368 
6369 



032434 
032434 
032434 
032434 
032440 

032442 
032450 
032456 

032464 
032472 
032500 
032504 
032510 
032514 
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SEQ 165 



032520 
032524 
032526 
032532 



032540 

032544 
032550 
032552 
032554 
032560 
032562 

032564 
032572 
032574 
0325 /6 
032576 



032600 
032606 



012700 
104441 
000022 
012767 
012767 
012767 
012767 
01276/ 
005067 
012700 
004767 
005067 



000240 



000022 
177777 
000001 
003411 
012*43 
147756 
002464 
165310 
147564 



004 767 166632 
103402 

000167 000212 

012767 003412 



012702 
016704 
110214 
111401 
042/01 
020102 
001412 

012/6/ 

005003 
005005 

104460 



52/6/ 
001456 



00001/ 
147472 



177760 



.SBTTL HARDWARE TEST - REGBRW - 

j* - DEVICE REGISTER BYTE ACCESS READ AND WRITE TEST - 

i* 

5* THIS TEST VERIFIES THAT THE DEVICE REGISTERS CAN BE READ AND WRITTEN 

;* CORRECTLY USING BYTE ACCESSES. 



14 7654 
147630 
151302 
151276 
151272 



BGNTST 




SETPRI 


0PRIO5 


TNUM • 


« TNUM ♦ 1 


MOV 


4TNUM.T5TNUM 


MOV 


0-:.»CTRLCF 


MOV 


01.ERRTYP 


MOV 


01601., ERRNBR 


MOV 


0EM1801.ERRMSG 


CLR 


ERSMRF 


MOV 


OERCNTB,R0 


JSR 


PC.CLR16W 


CLR 


EXOERR 



{ALLOW THE LTC TO 



T18: 

INTERRUPT. 



{INCREMENT THE ASSEMBLY TIME 

{SET UP THE TEST NUMBER. 

j INDICATE THAT WE ARE WITHIN 

{SET UP DEVICE FATAL INDICATOR IN 

j SET UP ERROR NUMBER IN THE ERROR 



MOV 4PRI05.R0 
TRAP C*SPRI 
TESI COUNTER. 

(18) 
A TEST. 

ERROR TYPE. 
TABLE. 



] SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 
I CLEAR THE ERROR SUMMARY FLAGS. 

; CLEAR THE ERROR COUNTER Tf BLE . 
jCLEAR THE "EXIT ON ERROR" "LAG. 

RESET THE OUT TO A KNOWN STATE, DO NOT REMOVE THE STATUS COOES FROM THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERRORS >>>>> 1801 <<<<<. 



; - 



151230 



JSR PC.RESETT 

BCS . »6 

JMP 60$ 

MOV 01802. .ERRNBR 



{RESET THE DHU-11, REPORT ANY ERRORS FOUND. 
,FATAL RESET ERROR? NO, CONTINUE WITH TEST. 
{YES. EXIT THE TEST. 
{SET THE ERROR REPORT NUMBER TO 1802. 



VERIFY READ/WRITE CAPABILITY TO INDIRECT ADDRESS FIELD OF CSR. 
US BYTE ACCESSES. 



2$ 



MOV 
MOV 
MOVB 
MOVB 
BIC 
CMP 
BEQ 



017.R2 

CSRA.R4 

R2.(R4) 

CR4),Rt 

017/760, Rl 

K1.R2 

4$ 



{SET LOOP COUNT. 

{GET CSR ADDRESS. 

{WRITE COUNT TO CSR. 

{READ BACK THE, CONTENTS OF THE CSR 

MASK OUT ALL BUT THE IND.ADR.REG FIELD. 

CHECK FOR CORRECT DATA WRITTEN/READ. 

IS EXPECTED DATA BAD? NO, SKIP ERROR REPORT. 



016416 15120; 



;Rfc'PORf "BAD BITCS) IN DEVICE CSR REGISTER FOR LINE (D). 



MUV 
CLR 

CLR 
ERROR 



WK1601.ERRBLK 

R* 
R5 



iSElECT THE PROPER ERROR REP0R1 ROUTINE. 
{SET OFFSET TO TO CAUSE REPORT OF CSR REG. 
{CAUSE REPORT Oh LINfc 0. 
; >>>>> ERROR 1802 <<<" 

TRAP C JERROR 



000100 147416 



EX 11 THE TEST If EXTENDED t RROR REPORTING HAS NOT BEEN ENABLED 



BIT 0[\l T06. OPT ION 
BLQ 60* 



fXlT WITH TEST FAIlURt" MESSAGE U 
NO EXTENDED ERROR REPOR f ING HAS BEEN 

DURING THE SOFTWARE 



At OUt ST fD 



CZOHUBO DHU-11 
HARDWARE. TEST 



6570 

6371 

6372 

6373 

6374 

6375 

6376 

6377 

6378 

6379 

6360 

t>381 

6362 

6383 

6384 

636*3 

6386 

6387 

6388 

6389 

6390 

6391 

6392 

6393 

6394 

6395 

6396 

6397 

6398 

6399 

6400 

6401 

6402 

6403 

6404 

6405 

6406 

64 0/ 

6408 

6409 

6410 

6411 

64 12 

6413 

6414 

64 1 r - 

6416 

t.4 17 

6418 

6419 

64 t ?0 

64 21 

6422 

6423 

6424 

64 25 

6426 



032610 



TUNC 1ST 



005302 
002356 



032614 
032620 
032624 
032630 



032634 
032640 



032642 
032650 
032652 



032656 
032662 



032664 
032672 
0326 74 
032676 



032/02 
032706 



005267 
012703 
012704 
004767 



005767 
001041 



012767 
005403 
004767 



00576 7 
001030 



0)2767 
005403 
005404 
004767 



005/6/ 
001016 
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SfcQ 166 



4$ 



DEC 
BGE 



R2 
2$ 



j DECREMENT 
j LOOP BACK 



LOOP COUNT/IND.ADD.REG ADDRESS, 
TO TEST NEXT ADDRESS IF NOT DONE 



151150 
177777 
000002 
166242 



147444 



WRITE AND VERITY 16 DATA PATTERNS IN ALL USED BITS OF ALL LOWER BYTES OF ALL 
REGISTERS ON ALL ACTIVE LINES, USE READ/WRITE ACCESSES. BEFORE WRITING 
EACH PATTERN, CLEAR ALL THE USED BITS OF ALL ACTIVE REGISTERS, 
REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1803 - 1805 <<<<< 

j SET THE ERROR NUMBER TO 1803. 

} INDICATE THAT LO BYTE ACCESSES ARE TO BE USED 

{INDICATE R/W ACCESS, CLEAR FIRST, 

;WRITE AND VERIFY DATA PATTERNS. 

EXIT THF TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 



INC 


ERRNBR 


MOV 


0-1.R3 


MOV 


42, R4 


JSR 


PC, REGTST 



TST 
BNE 



EXOERR 
60$ 



{IS THE 
{EXIT IF 



"EXIT ON 
IT IS, 



ERROR" FLAG SET ? 



WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS Of ALL HIGH BYTES OF ALL 
REGISTERS ON ALL ACTIVE LINES. USE READ/WRITE ACCESSES. BEFORE WRITING 
EACH PATTERN, CLEAR ALL THE USED BITS OF ALL ACTIVE REGISTERS. 
REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1306 1808 <<<<< 



003416 
166220 

147422 



151120 



MOV 


01806. , ERRNBR 


NEG 


R3 


JSR 


PC, REGTST 



{SET LiP ERROR NUMBER FOR REGTST ROUTINE. 
{INDICATE THAT HI BYTE ACCESSES ARE TO BE 
{WRITE AND VERIFY DATA 



USED, 



EXIT THE TEST IF AN ERROR HAS BEEN FOUNO AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 



; - 



Tsr 

BNE 



EXOERR 

60$ 



{IS THE "EXIT ON 
{EXIT IE IT IS. 



ERROR' FLAG SET ? 



003421 
166174 

147576 



151076 



WRITE AND VERIFY 16 DATA PAT1ERNS IN ALL USED BITS OF ALL LOWER BYTES OF ALL 
REGISTERS ON ALL ACTIVE LINES. USE READ/WRITS ACCESSES. BEFORE WRITING 
EACH PATTERN, SET ALL THE USED BITS OF ALL ACTIVE REGISTERS, 
REGTST ROUTINE REPORTS ERROR c WITH NUMBERS >>>>> ERROR 1809 1811 k<<< 



MOV 41809. , ERRNBR 

NEG R3 

NEG R4 

JSR PC.RFGTST 



i SET UP ERROR NUMBER FOR REGT5T 
{INDICATE THAT 10 BYTE ACCESSFS 
•.INDICATE R'W ACCESS. SET FIRST 
{WRITE AND VERIFY DATA PATTERNS 



ROUTINE. 

ARE TO HE USED 



EXIT THE TEST }} AN 
NOT BEEN REQUESTED, 



ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
I.E. EXOERR IS NONZERO. 



TST 
BNE 



EXOERR 
60 $ 



IS THE 
EXfT IF 



"EXIT ON 
IT IS. 



ERROR" FLAG SET ? 



WRITE AND VERIFY 16 DATA PATTERN' 
REGIS1ERS ON ALL ACTIVE LINES. 
EACH PATTERN. SET ALL THE USED 
REGTST ROUTINE REPORTS FRRQRS 



> IN ALL USED BITS U> ALL HIGH BYIE5 L» 4l.l. 

USE READOIRITF ACCESSES. BEFORE WRITING 
BUS Of ALL ACTIVE REGISTERS. 
WITH NUMBERS >»»** ERROR 181c 1 1814 < % m. 



032/10 012767 003424 151052 



MUV 



01612. , ERRNBR ibET UP ERRUR NUMBER FOR REGTST ROUTINE. 



CVQHUBO 
HARDWARF- 


DHU -11 
Tt ST 


FUNC TST 


PARTI 
- REGBRW 




6427 


03? 7 16 


005403 




6428 


032720 


004767 


166152 


64 29 








64 30 








6431 








64 52 








64 33 


030724 


005/67 


147354 


6434 


032730 


001005 




64 35 








64 36 








6437 








t>4 38 








64 39 


032732 


01276/ 


003427 


6440 


032^40 


004 767 


166364 


6441 


032744 


005067 


147336 


6442 


032750 
032750 








052750 


104401 
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SEU 167 



151030 



NEG 
J5R 



R3 
PC.REGTST 



; INDICATE THAT HI BYTE ACCESSES ARE TO BE USED 
{WRITE AND VERIFY DATA PATTERNS. 



EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 



TST 
BNE 



EXOERR 
60$ 



iIS THE "EXIT ON ERROR" FLAG SET ? 
>EXIT IF IT IS. 



PRINT ERROR SUMMARY REPORTS IF NECESSARY. 

THE FOLLOWING ROUTINE REPORTS ERRORS WITH NUMBER 



>>>>> ERROR ft 1815 <<<<< 



60i. 



MOV 
vJSR 

CLR 
ENDTST 



ftlB15. .ERRNBR 

PC.REPSMR 
CTRLCF 



{SET UP ERROR NUMBER FOR NEXT RTN. 
{REPORT ERROR SUMMARY IF NECESSARY. 
{INDICATE THAT WE COMPLETED THE TEST. 



L 10047 j 



TRAP 



C*ET5T 



Ml 



D 
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SEQ 168 



6444 
6445 
6446 
644/ 
6448 
6449 
64 SO 
64 SI 
64 S? 
6453 

o454 



64SS 
64 S6 
64 57 
64S8 
64S9 
6460 
6461 
6462 
6465 
6464 
6465 
6466 
646 7 
6468 
646 c * 
64 70 
64/1 

64/2 

64/3 
64 74 
64 >S 

64 76 
64// 
64 '/« 
64 /9 

6480 
6481 
64 8? 
6483 
6484 
64 85 
6486 
648 7 
6488 
f 489 
6490 
6491 
649? 
649.5 
6494 
64 9S 
64 l »6 
649/ 



032752 
0327S2 
032752 

032752 
032/56 

032760 

032766 
032774 
033002 
033010 
033016 
033022 
033026 
033032 



033036 

033042 
033044 
033050 



033056 

033062 
033066 
033072 



03*0/6 
033102 



012700 
104441 
000023 
012767 
012767 
012767 
012767 
012767 
005067 
012700 
004 767 
005067 



004 76/ 
103402 
00016/ 
012767 



00526/ 
012/03 
012/04 
004767 



00!) /6 / 
001041 



000240 



000023 
177/77 
000001 
003555 
012517 
147440 
002464 
164772 
147246 



166314 

000136 
003557 



150/06 
1 / 7 / / / 
000001 
1 66000 



14 7202 



147336 
147312 
150764 
150760 
150754 



BGNTST 




SETPRT 


4PRI05 


TNUM *» TNUM ♦ 1 


MOV 


GTNUM.TSTNUM 


MOV 


#-l,CTHLCF 


MOV 


Ol.ERRTYP 


MOV 


#1901. .ERRNBR 


MOV 


0EM1901.ERRMSG 


CLR 


ERSMRF 


MOV 


*ERCNTB,RO 


JSR 


PC.CLR16W 


CLR 


EXOERR 



150712 



SDTTL HARDWARE TEST - REGBRM - 

♦ » * + +. + + + + + + + ** + + ** + + + *** + ** + ** + + **** + ****** + * + ****** + ***** + * + +** + + *** + * + ** + + + 

* - DEVICE REGISTER BYTE ACCESS READ/MODIFY/WHITE TEST 
+ 

♦ THIS TEST VERIFIES THAT THE DEVICE REGISTERS CAN BE READ AND WRITTEN 

* CORRECTLY USING BYTE ACCESSES IN READ/MODIFY/WRITE MODE. 

+ 

T19:: 
; ALLOW THE LTC TO INTERRUPT, 

MOV #PRI05,R0 
TRAP CSSPRI 
j INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
;SCT UP I HE TEST NUMBER. (19) 
; INDICATE THAT WE ARE WITHIN A TEST. 
{SET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 
SET UP ERROR NUMBER IN THE ERROR TABLE. 
SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 
CLEAR THE ERROR SUMMARY FLAGS. 

: CLEAR THE ERROR COUNTER TABLE. 

{CLEAR THE "EXIT ON ERROR" FLAG. 

R'iSET THE OUT TO A KNOWN STATE, DO NOT REMOVE THE STATUS CODES FROM THE FIFO. 
CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERRORS >>>>> 1901 <<<<<. 

jRESET THE DHUli. REPORT ANY ERRORS FOUND. 
iFA.U RESET ERROR? NO, CONTINUE UITH TEST. 
;YES, EXIT THE TEST. 
I SET THE ERROR REPORT NUMBER TO 1903. 

THE READ/MODIEY/WRITK CAPACIt ITY TO INDIRECT ADDRESS FIELD OF CSR IS NOT 
TESTED SINCE THIS IS AN ILLEGAL FORM UF ACCESS TO THIS REGISTER. 



WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL LOWER BYTES OF ALL 
REGISTERS ON ALL ACTIVE LINES. USE READ/MODIFY/WRITE ACCESSES. BEFORE 
WRITING EACH PATTERN, CLEAR ALL THE USED BITS Of ALL ACTIVE REGISTERS. 
REGTSf ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1903 - 1905 <<<<< 

SET THE ERROR NUMBER TO 1903. 

INDICATE THAT LO BYTE ACCESSES ARE TO BE USED 

INDICATE R/M/W ACCESS, Cl-EAR FIRST. 

WRITE AND VERIFY DATA PATTERNS. 

EXI T THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED, I.E. EXOERR IS NUN VERf). 



JSR 


PC.RESEYT 


BCS 


. *b 


JMP 


60$ 


MOV 


01903. ,ERRNBR 



INC 


ERRNBR 


MOV 


# 1.R3 


MOV 


01 ,R4 


JSR 


PC.REGTST 



1ST 

BNF 



EXOERR 
60$ 



lIS THE "EXIT UN ERROR" FLAG SET 
j E X 1 T IF IT [S. 



WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL HIGH B>TES OF ALL 



053104 
033114 



0331,70 
033124 



CZDHLMC DHU-11 
HARDWARE TEST 



6448 

6499 

6500 

61)01 

650? 

650? 

6504 

6505 

6506 

6507 

6508 

t>509 

6510 

6511 

651? 

6513 

6514 

65 IS 

6516 

6517 

6518 

6519 

65?0 

65?l 

65?? 

65,1? 

6524 

6525 

6526 

652 ; 

6528 

6529 

6530 

6531 

653? 

6533 

6534 

6535 

6536 

653' 

6538 

6539 

6540 

6541 

6542 

6543 

6544 

6545 

6546 

654 7 

6548 

6^49 



FUNC TST 



033126 
0331M 
033156 
033140 



033144 
033150 



03315? 
033160 
033162 



033166 
033172 



0331/4 
033202 

033206 
033212 
03321? 
033212 



012 76/ 
005403 
004 767 



005 76 7 
001030 



012 76 7 
005403 
005404 
004 767 



00576 7 
001016 



01276 7 
005403 
004 767 



00576/ 
001005 



012/67 
004 76/ 

005067 



104401 
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SEQ 169 



00356? 15065b 
165756 

147160 



REGISTERS ON ALL ACTIVE LINES. USE READ/MODIFY/WRI I E ACCESSES. BEFORE 
WRITING EACH PATTERN, CLEAR ALL THE USED BITS OF ALL ACTIVE REGISTERS. 
REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1906 - 1908 <<<<< 



MOV 01906, .ERRNBR 
NEG R3 
JSR PC,REGTS r 



;SET UP ERROR NUMBER FOR REGTST ROUTINE. 

; INDICATE THAT HI BYTE ACCESSES ARE TO BE USED 

{WRITE AND VERIFY DATA PATTERNS. 



; EXIT THE TEST IF AN 
j NOT BEEN REQUESTED, 



BNE 



EP30R HAS BEEN FOUND AND EXTENDED ERRGR REPORTING HAS 
I.E. EXOERR IS NON-ZERO. 

EXOERR {IS THE "EXIT ON ERROR" FLAG SET ? 

60* {EXIT IF IT IS. 



003565 150634 



165732 



147134 



WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL LOWER BYTES OF ALL 
REGISTERS ON ALL ACTIVE LINES. USE READ/MODIFY/WRITE ACCESSES. BEFORE 
WRITING EACH PATTERN, SET ALL THE USED BITS OF ALL ACTIVE REGISTERS. 
REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1909 1911 <<<<< 

jSET UP ERROR NUMBER FOR REGTST ROUTINE. 
{INDICATE THAI 1.0 BYTE ACCESSES ARE TO BE USED 
.INDICATE R/M/U ACCESS, SET FIRST. 
{WRITE AND VERIFY DATA PATTERNS. 

EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 



MOV 


01909. , ERRNBR 


NEG 


R3 


NEG 


R4 


JSR 


PC. REGTST 



TST 

!3NE 



EXOERR 
60* 



j 15 THE "EXIT ON ERROR" FLAG SET 
sEXIT IF IT IS. 



003570 150610 
165710 

147112 



WRITE KV VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL HIGH BYTES Of ALL 
REGISTERS ON ALL ACTIVE LINES. USE READ/MODIFY/WRITE ACCESSES. BEFORE 
WRITING EACH PATTERN, SET ALL THE USED BITS OF ALL ACTIVE REGISTERS. 
REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>»»> ERROR 1912 - 1914 <<<<< 

{SET UP ERROR NUMBER FOR REGTST ROUTINE. 
{INDICATE THAT HI BYTfc ACCESSES ARE TO BE USED 
{WRITE AND VERIFY DATA PATTERNS. 

EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED, I.E. EXOERR IS NON ZERO. 



MOV 


01912. .ERRNBR 


NEG 


R3 


JSR 


PC, REGTST 



TST 
BNE 



EXOERR 
60$ 



{IS THE "EXIT ON ERROR" FLAG SET ? 
;EXIT IF IT IS. 



PRINT ERROR SUMMARY REPORTS IF NECESSARY. 

THE FOLLOWING ROUTINE REPORTS ERRORS WITH NUMBER >>>^> ERROR 1915 <<<*< 



003573 1S0566 

166122 

147074 



00$: 



MOV 


01915. .ERRNBR 


JSR 


PC.REPSMR 


CLR 


CTRLCF 


ENDTST 





SE1 UP ERROR NUMBER FOR NEXT R1N. 
REPORT ERROR SUMMARY IF NECESSARY. 
INDICATE THAT WE COMPLETED THE TEST. 



110050; 



TRAP 



c<tTsr 



B I 4 



CJDHU60 DHU n KUNC 1ST 
HARDWARE TFST 

b r »s c > 
* Vl ' 

bSbO 



PARTI 

IDBIT 
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b*>M 

b"ib4 
bSbS 
?>Sbb 
b r *. ' 
f.Sbfl 

bSb 1 * 

♦.s 70 
b"»74 

r, r > /«, 
#>«» / ; 
b*> /«# 

#»s«o 

b*»81 
b'lM,' 

b«i«4 

bbttS 



05 V 14 
033.U4 
55.H4 

03.V14 

o3v*?o 

OM.V, 1 
3 3.' 30 
03 V 3b 
033J44 
033252 



012/00 

104441 
000024 

012/6/ 

012/67 



033260 
035264 



3V66 

03 V 7b 
33 500 
O 3 3 »06 
035312 
05 3320 
033 320 
03 3 322 

*,33 3.'#. 
033326 



004 /(, 7 
XC3016 



017 701 
032 701 
OO10L1 
012/6/ 

012701 

012 /b/ 

I044e>0 
00S0b7 



104401 



000240 



000024 
\7I!7 ? 
00000 1 
00 3 721 

012602 



166072 



!4b7S6 
000400 

003/22 

oi26S2 

01613b 



146/60 



14 70 74 
14/0S0 
1^0522 
150Mb 
150512 



1S0462 
150454 



, SBTTl HARDWARE TEST IOBIT 

I* 
I ♦ 



I * 
I* 

I 



DEVICE REGISTER 10 BIT TEST 
THIS TFST VERIFIES THAT THE OUT STAT REGISTER 10 BIT READS AS SF T , 

BGNTST 



SETPRI OPRIOS 



[Nun -- TNUM * 1 

MOV OTNUM.TSTNUM 

MOV •-l.CTRl.CE 

MOV 01.ERfi T TP 

MOV 02001. ,ERRN6R 



T20: : 

l ALLOW THE. I TC TO INTERRUPT. 

MOV OPMIOS.RO 

TRAP C*SPRI 

I INCREMENT THE ASSEMBLY TIME TF.Sf COUNTER, 

I SET UP THF TEST NUMBER. (20) 

jINOlCATE THAT WE. ARE IN A TEST. 

1 SET UP DEVICE FATAL INDICATOR IN ERROR TrPE. 

I SET UP ERROR NtJiBER IN THE ERROR TABLE. 



MOV 



0EM2OO1.ERRMSG j SE f UP ERHOH MESSAGE FOR TEST IN ERROR TABU. 



j RESET THE OUT TO A KNOWN STATE, DO NO 1 REMOVE THE STATUS COOES FROM THE FIFO, 
j CLIAR TX AND RX INTERRUPT ENABL t BITS IN THF CSR. 
I THIS SUBROUTINE REPORTS ERRORS »>*>* 2001 <<<<<. 

JSR PC.RESETT (RESET THt DHU 1 1 , REPORT ANt ERRORS FOtNO. 

BCC 60$ jFATAl PESFT FRROR? tFS, EXIT THE TEST. 

I READ THE STAT RFGTSTIR ID HIT AND VfRIM THAT IT IS CiEAR. 

MOV BFSLSA.Ri {READ THE STAT REGISTER CONTENTS. 

BIT 0eiT8,Rl i CHECK JHk ID BIT. 

BNt 60$ j ID HIT SET? tES. EXIT THE TEST. 

MOV 02002. ,ERPNHR |N0, SET THE tRRW REPORT NUWE.R TO 2002. 

MOV 0EH2OO2.R1 |UE T THt PROP* R ERROR MfSSAU, 

MOV OERO r >0 3,ERRBLK i Sill C T The PROPER ERROR REPORT ROUTINE., 

ERROR : I RROR Ni *1fH « • • ■ » • 2002 * * • < • 

TRAP CURROR 

CTRLCF tINOlCATt THAT WE COMPLETED The TfST. 



601 



Ll R 
ENDTST 



SEQ 170 



L 10051 i 



TRAP 



CtETST 



fiMft'W 1 MJNC 



TST PA^^j MACRO Mi?00 



MAR 84 09t 15 



C 14 

pake ipo 



SECJ 171 



r.SB / 
♦>588 

r,V»5 
r.V*4 
f. VJ5 



>>t>01 

f.60 5 

f>b04 

fi#iO/ 
MjO* 
bbO'l 
*>MO 

•»»>i2 

f:i»i 1 5 

tit'iUi 
nM: 
f»6l8 
f»M4 
*>*-.. '0 
fcr>21 
t>*>22 
*>b.»5 
M.24 
bfi.'S 

*»»>.! / 

f )f j 50 

b*> 5.' 
M. 5 ? 
M:>54 
Mi 55 
M» 'V, 
M, '» ' 

M- <M 

6640 



055550 
055550 
055550 
055550 
055554 

055556 
05 5544 
03535;* 
055560 
05 5. '66 
055374 



05 540 J 
055406 



055410 
055414 

O5 54i?0 

05 5424 

5 54 50 
5 54 54 
055440 
055444 
053450 



05 54 r >4 
O554^>0 
5*462 
5 54/0 
053474 



012 700 
104441 
000025 

01^76/ 
0.^767 

012/6? 
012/6? 
012/6/ 

012/67 



004 /«, * 
103114 



016/05 
012700 
004 76/ 
01? 700 
004 76 / 
01.7/04 
004 76 / 
012/05 
004 767 



OU 1 705 
005004 
012/6/ 
0»,O56/ 
001453 



000240 



000025 
177777 
000001 
004375 

oic* u:s 



1643/4 



146614 

000200 

1/0 u>. 

17/6/0 
1/0146 
00001? 
164460 

1 / / / / / 
lb 7224 



OOOOOl 

004 5 76 
146534 



146/60 
146/34 
150406 
15040? 
150 5/6 
15037c? 



SUn I HARDWARE. TE ST TXEN8I 

♦ TX ENABLE (INACTIVE) TEST 

♦ THIS TEST VERIr'XtS THAT WHEN THE I If*. UNDER TEST'S IX ENABLE HIT IS 
CLEAR, TRANSHISSION WILL NOT TAKE PLACE ON THAT LINE.. 

♦ THIS TE'jf IS PERFORMED IN INTERNAL l.OOPHACK , AND ON All ACTIVE I INE 5. 

- . 44444444444444444444 '.44444*444444444444444444444444444444444444444444444444 

TL'li : 

1 ALLOW I TC INTERRUPTS, 

MOV ©PRI05.R0 

TRAP C5SPRI 

j INCREMENT THE ASSEMBU TIME. TEST COUNTER. 

I SET UP THE TEST NUMBER. C?3) 

lINOICATE THAT WE ARE IN A TEST. 

I SET ERROR TYPE AS FATAL IN ERROR TABLE. 

I SET THE FIRST ERROR NUMBER IN ERROR TABLE. 

I SET ERROR MESSAGE ADDRESS IN ERRTBL, 

iSElECT THE CORRECT ERROR REPORTING ROUTINE. 

, RESET THE OUT TO A KNOWN STATE. REMOVE THE. STATUS COOES FROM THE FIFO. 

} CI EAR TX ANO RX INTERRUPT ENABt t BITS IN THE. CSR. 

j THIS SUBROUTINE REPORTS ERROR >*>*» 2501 <<<<<. 
J 



BGNTST 




•>:tpri 


0PRI05 


tnum • 


«• TNUM ♦ 1 


MOV 


•TNUM.TSTNUM 


MOV 


• l.CTRLCF 


MOV 


•l.ERRTYP 


MOV 


•2101, .ERRNBR 


MOV 


•EM2301,ERRMSG 


MOV 


♦ER9101.ERRBLK 



JSR 
BCC 



PC.CLNRST 

60$ 



j RESET THE DHU 11, REPORT ANt ERRORS FOUND 
, RE SET FAILURE?, ABORT THIS TEST, 



SET INTERNA!. LOOPBACK ON ALL ACTIVE I IN£ S . 
SET LPR ON ALL LINES TO 5B.4K BAlO, d BITS 
? STOP BITS. 
ENABLE TRANSMITTERS ON ALL LINES. 



PER CHARACTER, 000 PARITY 



MOV ACTLNS.^5 

MOV #200, RO 

JSR PC.WTWINC 

MOV #l//6,'O,R0 

JSR PC.WTWIPR 

MOV •10..R4 

JSR PC.DELAi 

MOV #MAPl NS.R5 

JSR PC.TXENHI 



HAP 



TERS 



iPASS THE ACTIVE L INE BIT 

|PASS THE INCTRl CONTENTS. 

I INITIAL ISE THE LNCTRl. RFGI 1 

I PASS TmE. LPR CONTENTS. 

i INITIAL Sf y^t LPR REGISTERS ON All 

iPASS OELAt TIME O 10 MILL I ■ SE CONOS . 

j WAIT FOR LNCTR ANO LPR REGS TO BE i."PO»WED. 

j PASS THE BIT MAP CORRESPONDING to ALL LINES 

j ENABLE TRANSMITTERS ON ALL LINES. 



[NE 



TEST ALL ACTIVE LINES INDIVIDUALLY 



j DISABLE TRANSMISSION ON EACH ACTIVE I INE 



150300 £tt 



MOV #1,R5 

Li R R4 

MOv 0?50«*. .ERRNBR 

BIT R5.ACTLNS 

ReO 6$ 



Cl E AH \Hi TX INABLE. HIT IN 
Stl * Cl THE LINE. IJNDEH TEST . 

VERIFY IT IS CLEAR* REPORT ERROR H SIT 



I SET l.*» :Ht l INE HIT MAP » OR CHANNEL 0, 
jClEAR THE LINE NUM0E H COLLIER. 
(SET THE ERROR NUMBE R TO J SO J . 

i check a the: l ine is active . 

jSKIP TESTING THIS I INE If H l l i INACTIVE. 
fH'» ► AlV RElilSTtR, 



MRfWW 1 IUNC 



TST F'A 



m 



NBl 
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DI4 

page t?o i 



M-Q 17? 



ft 



6M I 

664? 
6t>44 

6645 

l*t*A ' 

r%r>48 
r,r.4 l ) 
t.f.SO 
6651 

h65? 

66 S 4 
6655 

66*. ; 

r>658 
*jt>5^ 

htifoO 

6661 
666 J 

e.664 
6665 
6666 
666/ 
666H 

66/0 
6b .' 1. 
66 /? 

66 M 
66 /4 
r-6 /5 
66/6 
O .'"/ 
66 /rt 

6680 

6661 

668? 
668? 
6684 
6685 
6686 
66 H / 

66aa 



0514/6 
053500 

OMS04 
033510 
035514 



033S16 
033 V4 
03 '55? 
055556 
03354/ 
03354b 



035550 
033554 
5 5560 
05 3564 
5 55/0 
0535// 
0335/6 
03 360? 

033604 
053606 

05561? 
03361? 

055614 
0336?? 



0336^4 
0536?6 
033630 
03363? 
03 3636 



010 305 
004/6/ 
0104// 
005 ? / / 
100433 



Ol?/6/ 
il?7// 
01? 70! 
016/0? 
004 76/ 
103416 



0051*6 / 
012/01 
016/0? 
004 /6 / 
10*405 
005/6 / 
01/70/' 
100010 

010401 
01?70? 



104460 

05? /6/ 
001406 



000?41 
006103 
005?04 
0?04// 
00? Ml 



053640 00506/ 
U 13644 
03 5644 
033644 104401 



16/100 
14^.5' 
14654? 



004 5 / / 
00001? 
1/000 5 
146500 
167522 



150? I 4 
0/001? 
146456 
167500 

1501/? 
14644? 



01277? 



0000/0 



14644? 



150/44 
146516 



Ail 



000100 14640? 



MOV 
J5H 
MOV 
1ST 

BMI 



R5.R5 
PC, TXDSBL 
R4.&CSRA 

STXAD2A 
4$ 



iPASS THE B r T MAP OF THE I. INF. UNDER H5T. 

I DISABLE TRANSMISSION ON THE l. INI. UNDER ftST 

iSElFCT THE LINE CURRENTl V UNDER TEST. 

I VERIFY THE TX ENABLE BIT IS SET, 

I GO REPORT ERROR IF TX ENABLE BIT SET. 



WRITE OATA BYTE ( ASC 
WAIT F OR A TX ACTION 
IS FOUND BEFORE TIME 



11 <LF > ) TO THE 
TO BE RETURNED 
OUT OCCURS. 



output ufo. 
report error 



IF A TX ACTION 



MOV 
MOVB 
MUV 
MOV 

JSR 

HCS 

i WAIT 

I • 

INC 

MOV 
MOV 

JSR 

BCS 
INC 
MOV 

BPl 

MOV 
MOV 

ERROR 



HIT 



02303, ,ERRNBR 

•1? ( BFDATA 

0170003, Rl 

C5RA.R? 

PC.WAIBIS 

41 



I *.IT ERROR NUMBER TO 2303. 

I WRITE THE DATA BYTE TO THE OUT 

I TEST BIT 15. TIMEOUT OF 5 Mill 

lPA ( 



THE ADORES , OF THE REGISTER 
jWAIT FOR TX ACTION i'J COME BACK, 
j GO REPORT ERROR IF A TX- ACT ION FOUND 



OUTPUT F 

■;rcs. 

TO TEST. 



IE 



FOR THE OATA TO APPEAR IN THE FIFO. REPORT ERROR IF DATA FOUND, 



ERRN8R 
0/001?, Rl 
CSPA.R? 
PC.vJAIBTS 
4i 

FRRNBR 
sJHBUFA.R? 

R4.R1 

0EM2S02.R2 



OBlTOb, OPTION 

60$ 



jSET ERROR NlWBER TO ?5C4 . 

> TEST BIT 7. TIMEOUT OF 10 MIL I I SEC 

j PASS THE ADDRESS 0* THE 

jWAIT FOR RX DATA AVAILABLE TO 

j REPORT ERROR IF DATA RECEIVED 

I SIT ERROR NUMBER TO ?305. 

» READ THE DATA FROM 1 HE FIFO. 

jSKIP ERROR REPORT IF OATA ISN'T THERE 

I PASS THE NUMBER Of CURRENT LINE UNDER 
I PASS THE MESSAGE TO BF REPORTED. 
I 'TX ENABLE BIT BAD ON I INE : NN . 
j > » » > » ERROR < < < < « . 

TRAP 



REGISTER TO TEST. 
St T . 

IN THF FIFO 



TEST 



CM RROR 



it XII THE l\ ST . UlTH THf TF 4 - 
iH MTJNDtO ERROR REPORTING 

i REQUESTED. 



T F All ED ME. % , ,AGE 
HAS NOT BEEN 



VERIFY Alt ACTIVE LINES HAVE BEEN U5TED. 



61: 



60* i 



CI C 
ROl 
INC 
CMP 
HI T 

CI M 

tNOTbT 



R4 
R4 
?« 



ONUMLNS 



CTRLCF 



t CLEAR THE CARRi BIT PRIOR TO ROTATION, 
I SHIM THE BIT MAP FOR THE NEXT LINE. 
I INCREMENT I** \ INf NUMBER COUNTER. 
I HAVE ALL THk I INEZ. BEEN TESTED/. 
|N0| RRANCH TO TEST THE NEXT I INE . 

j INDICATE THAT WE ARE NUT UTTHIN A TEST. 

LLOOSJt 



TWAP 



CM TS 



i$»°V^ 



1 FUNC rsT 



L 1 4 



P/ W 



NBA 
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r *EQ 175 



t»tS l >0 

b6 v >l 
fcb**2 
6t. ,: >3 
66 l )4 
66''5 

r>f ..O ,* 
*>6^ 

6699 

o700 



6 701 
n /O? 
6 703 
6 704 

*■ /os 

b?0*> 

6 707 

6 708 
6 709 
6 710 
6/11 
b71? 
6713 
6714 
6 7 IS 
6716 
6 717 
6718 
6 7V 
6 7,?0 
fo.Vi 
6 722 
6/23 
6/24 
6 725 

6 /26 

6 72 7 

t./;?8 

r.729 
t. 730 
b73l 
f,M2 
6/35 
h/54 
b/35 
6 736 
6 73 7 
6738 
6 7 59 
»,/40 
*, 74 1 

6/4;: 

e?43 



033646 
033646 
03364b 
033646 
033652 

0336S4 
033662 
033670 
0336 76 
035704 
03371c? 



033/20 
033724 



053/26 
033/52 
035756 
033/42 
035/46 
03 3/52 
055/56 
033 762 
03376b 



055/72 
035/76 
54000 
034006 
034012 



012 700 
104441 
000026 
0i2767 
012767 
012767 
012 767 
0127b7 
012767 



004 76 7 
103133 



016/05 
012700 
004 76 7 
012 700 
004 76 7 
012/04 
004 76 7 
012/05 
004 767 



012703 
005004 
012767 

050567 
00146/ 



000240 



000026 
177 77 7 
000001 
004541 
013030 
017222 



164056 



146276 
OOO200 
167610 
1776 70 
1676*0 
000012 
164142 
17 7 7 7 7 
166612 



000001 

004542 

146216 



146442 
146416 
1500/0 
150064 
150060 
150054 



.SBTTl HARDWARE 1EST - TXEN8A- 

TX ENABLE (ACTIVE) TEST 
THIS TEST VERITIES THAT WHEN THE TX ENABLE BIT 15 SET IN THE MPPRORIATE 
LINE REGISTER, TRANSMISSION WILL TAKE PLACE ON THAT LINE. 
THIS TEST IS PERFORMED IN INTERNAL l.OOPHACK, AND ON Alt. ACTIVE 1 INES. 

; - - * + *** + + ******* + **. + + * + + +. + *. + * + *. + *** + + **+ + *** + + + * + + + * + + ***** + ** + *****.**** + + +■ + * 



BGNTST 




SETPRI 


0PRI05 


TNUM - 


- TNUM ♦ 1 


MOV 


OTNUM.TSTNUM 


MOV 


l.CTRLCF 


MOV 


Ol.ERRTYP 


MOV 


02401, .ERRN6R 


MOV 


OEM2401.ERRMSG 


MOV 


0ER9101.ERRBLK 



l ALLOW LfC .»;ntlrrupts. 



T22 



MOV 
TRAP 



dPR I05.R0 
CISPftI 



I INCREMENT THE ASSEMBLE TIME TEST COUNTER. 

I SET UP THE TEST NUMBER. (24) 

j INDICATE THAT WE ARE IN A TEST. 

jSEl ERROR TYPil AS FATAL IN ERROR TABLE. 

iSET THE FIRST ERROR NUMBER IN fLROR TAB1 f . 

ODRESS IN ERRTBL. 

ERROR REPORT INK', ROUTINE 



j SET ERROR MESSAGE 
j SELECT THE CORRECT 



t 
i 
J 
i 
\ - 



RE^ET THE DUT TO A KNOWN STATE, REMOVE THt STATUS CODES FROM THE FIFO. 

CLEAR TX ANO RX INTERRUPT ENABLE BITS IN THE CSR, 
THIS SUBROUTINE REPORTS ERROR >»*>> 2401 <<<<<. 



HCC 



PC.CLNRST 
60$ 



{RESET 
{RESET 



SE1 

r,F t 

7> r . 



INTERNAL LOOKBACK ON AIL ACTIVE 
LPR ON All LINES TO 38 . 4K BAUO, 
OP BITS. 



THE DHU 11, REPORT AN> ERRORS FOUND. 
FAILURE?, ABORT THIS TEST. 

I 1NE S . 

8 BITS PER CHARACTER, ODD PARITt, 



DISABLE TRANSMITTERS ON ALL LINE 



MOV ACTLNS.R5 

MCV 0200.RO 

JSR PC.UTWLNC 

MOV 01//6/O.R0 

JSR PC.UTWLPR 

MOV 010., R4 

JSR PC.DELAT 

MOV OMAPIN5.R5 

JSR PC.TXDSBl 



{PASS }Ht. ACTIVE LINE BIT MAP. 

(PASS THC t.NCTRl CONTENTS. 

j INITIALISE THE LNCTRl REGISTERS. 

(PASS Thfc LPR CONTENTb. 

jINITlALSE THE LPR REGISTERS ON ALL l INf S . 

j PASS DELAY TIME Of 10 Mill I SECONDS. 

i WAIT FOR LNCTR AND LPR REGS TO HE UPDATtD. 

{PASS THE BIT MAP CORRE SPONOINu TO ALL LINES 

{DISABLE TRANSMITTERS ON ALL LINES. 



I if SI ALL ACTIVE LINES iNO I V IDUALA t . 

; ENABLE TLANSMISSION ON EACH ACTIVE I INF 



14V 762 2f: 



MOV Ol.R* 

CLR R4 

MOV 02402. .EHRNHR 

UI1 R3.ACTLNS 

HEQ 8$ 



{SET UP THE I INE HIT MAP >M CHANNEL 0. 

1 CLEAR THE LINE NUMBER COUNTER. 

{SET THE ERROR NUMtft R TO 2402. 

I CHICK U ^Hk: I INF IS ACTtVl . 

iS/UP TESTING THIS LINE IF IT IS INACTIVE 



i 



H.tCT THI L.INt UNOfcR rh'-.J, 

St T THE TX_ENAHLt BIT IN TIK» > AiV Rl »l> H R, 
VERIFY IT IS SET, REPORT ERRUR IF CI EAR, 



CZ&HUBO DHU-11 TUNC TST PARTI 

" TEST - TXENBA- 



HARDWARE 



4 
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SEQ 174 



h/44 
b745 

6 746 

6/48 

b74Q 

6 750 

6/51 

6752 

h/53 

6,54 

r>755 

6 756 

6 75 / 

6 75a 

r>/5S 

6 760 

6 761 

6 762 

6 76.5 

6764 

6/65 

6/66 

6767 

6 768 

6/6Q 

6/70 

6771 

677? 

6//3 

67 74 

67 75 

6/76 

6 / 7 / 

6 / >8 

b//4 

6/80 

6 /HI 

6/82 

6/85 

6 784 

f> /85 

6/86 
6/8/ 
6/88 
6/84 
6 790 

6/<n 

6/92 
6/93 
b 794 
6 795 
6 796 
b/9/ 
*>/'>*» 
6 799 



034014 
034016 
034022 
034026 
034032 
034036 



034040 
034046 
034054 
034060 
034064 
034070 



034072 
0340 76 
034102 
034106 
034112 
034114 
034120 
034124 
034126 
034132 
034134 
034140 
034142 
034144 
034146 
034150 

034152 
034154 

C 34 160 
034160 

034162 
034170 



541/2 
0341 /4 
034200 
034202 
034204 
03420b 
034212 



010305 
004 76 7 
012705 
0104 77 
00577 7 
100045 



012767 
112777 

012/01 
016702 
004767 
103030 



00526 7 
012701 
016702 
004 767 
10301/ 
00526 7 
017702 
100012 
00526 / 
CO0302 
04 2/02 
020204 
001003 
005305 
001534 
000410 

010401 
012702 



104460 

52/6 7 
001411 



010305 
004 76 / 
00024 1 
00610 5 
005204 
O2042 7 
002672 



166656 
000012 
146210 
146220 



00454 3 
000012 
170004 
146156 
167200 



147672 
070012 
146134 
167156 

14 7650 
146120 

14 7636 

177760 



166404 



000020 



14/722 
146174 



4$: 



012772 



000100 146034 



6$ 



MOV 

JSR 
MOV 
MOV 
1ST 

BPL 



RS.R5 

PC.TXENBL 
010. ,R5 
R4,b)CSRA 
STXAD2A 
6$ 



{PASS THE GIT MAP OF THE LINE UNDER TEST. 

{ENABLE TRANSMISSION ON THE LINE UNDER TEST 

»SET TXCHAR/LOOP COUNT TO 10. 

I SELECT THE LINE CURRENTLY UNDER TEST. 

{VERIFY THE TX ENABLE BIT IS SET. 

I GO REPORT ERROR IE TX ENABLE BIT CLEAR. 



WRITE. DATA BYTE (ASCII <LF>) TO OUTPUT FIFO. 

WAIT FOR A TX ACTION TO BE RETURNED, REPORT ERROR IF NO TX ACTION 

FOUND BEFORE TIME OUT OCCURS. 



MOV 02403. .ERRNBR 

MOVB 012,o)FDATA 

MOV 0170004, Rl 

MOV CSRA.R2 

JSR PC.WAIBIS 

BCC 6$ 



{SET ERROR NUMBER TO 2403. 
j WRITE THE DATA BYTE TO THE OUT' 
I TEST BIT 15, TIMEOUT OF 4 MILL I 
j PAS' 



i OUTPUT FIFO 
SECS. 
THE ADDRESS OF THE REGISTER TO TEST. 
I WAIT FOR TX ACTION TO COME BACK, 
{GO REPORT ERROR IF NO TX-ACHON FOUND. 



j 



l WAIT FOR THE DATA TO APPEAR IN THE FIFO, REPORT ERROR IF TIME-OUT, 



i - 

INC ERRNBR 

MOV 070012, Rl 

MOV CSRA.R2 

JSR PC.WAIBIS 

BCC 6i 

INC ERRNBR 

MOV 3RBUFA.R2 

BPl 6$ 

INC ERRNBR 

SWAB R2 

BIC 01/7/60, R2 

CMP R2 , R4 

BNE 6$ 

DEC R5 

BNE 4 1 

BR 8$ 

MOV R4.W1 

MOV 0EM23O2.R2 

ERROR 



BIT OB I T06. OPT ION 
BEQ 60 J 



j SET ERROR NUMBER TO 2404. 

{TEST BIT 7, TIMEOUT Of 10 Mil I I SFCS. 

;PrtSS THE ADDRESS Of I HE REGISTER TO TEST. 

{WAIT FOR RX DATA AVAILABLE TO SET. 

{REPORT ERROR IF NO DATA RECEIVED IN THE FIFO 

{ SET ERROR NUMBER TO 2405. 

jREAD THE DATA FROM THE FUG. 

{GO REPORT ERROR IF THt.R IS' NT ANr DATA THERE 

{SET ERROR NUMBER TO 2406. 

jPUT THE LINE NUMBER IN THE LOW By YE. 

{CLEAR THE UNWANTED BITS. 

{DID THE DATA COME FROM THE CORRECT LINE?. 

{NOj GO REPORT THf ERROR. 

{DECREMENT THE TXChAR/LOOP COUNTER, 

{LOOP TO TX THE NEXT CHAR. 

{GO TEST THE NEXT l INE , 

;PASS THE NUMBER OF CURRENT LINE UNDER TEST. 
{PASS THE MESSAGE TO BE REPORTED. 
j "TX, ENABLE BIT BAD ON LINE: NN". 
I > •. >> > ERROR < * < < « . 



TRAP 



CHWROR 



{E>1T THE TEST IF EXTENDED ERROR 
{HAS NOT BEEN ENABLED, SINCE THE 



RtPORt ING 

TEST HAS FAILED 



VERlFi All ACTIVI I INES HAVE BEEN TESTED. 



at 



rtov 


R3.H5 


JSR 


PC, T XDSBL 


CI c 




win 


R5 


INC 


R4 


CMP 


R4.0NUMLNS 


BLT 


2i 



I PASS XHF BIT MAP OF IhE LINE UNDER TIST 
{CLEAR THE TX ENABLE BIT ON THIS LINE. 
{CLEAR THF CAHRt BIT F>RIQR TO ROTATION, 
j',HlF T IMF BIT MAP FOR THE NE x f I INE . 
i INCREMENT THE LINE NUMBER COUNTER. 
{HAVE All THE 1 INI S fU.EN riSTfO. 1 . 
;N0; URANCm TO TEST TK NL\T LINE. 



i ; 1 4 



C :0HUrtO OHl.J-H KJNC TST PAR I I MACHO Ml.HK) IS -MAR -84 04: IS PAlit U'l-i? ^ECl 1 7S 

HAROWAHf Tl.il TXKNBA- 

t>800 054.H4 OOSOb/ 146006 bO$ : Cl.H C1HLCF i INDICATE THAT Wt ARI-. NOT UITHINA TJST. 

6801 0*4^0 END TST 

o54;vo 1.10053: 

0342<?0 104401 TWAP CJf.TST 



H 1 4 



C/DHUHO DHU 11 KUNC TST PARTI MACRO M1200 15-MAR-84 09 : 15 PAL-E 122 
HARDWARE TEST - INTA - 



StU 1/6 



^803 
6804 
6805 
6806 
680 ' 
6808 
6809 
6810 
6811 
68 12 
681? 
o814 
6815 

6816 



6817 
6818 
6819 

6«?o 

6821 
68?? 
6823 
6824 
6825 
6826 
6827 
6828 
6829 
6850 
6831 
685? 
6855 
6854 
6835 
6836 
6837 
6858 
6859 
684 
6841 
6 84? 
6845 
6844 
hH45 
6846 
6847 



054222 
034222 
054222 
054222 
034226 

03423' 

054236 

034244 

034252 

034260 



6848 



054266 
0342 72 
0342/4 
034300 



034 306 
034312 



034316 
034322 
034 326 

034 33? 
054 340 
034 340 
034 344 
054350 
0343*54 
034 560 
34 562 
034 566 
054 5*6 
54 572 



012700 
104441 
000027 
012/67 
01276/ 
012/67 
012/67 
012767 



004767 
10340? 
000167 
012767 



012/05 
004767 



005067 
005067 
00506 / 
012 767 

012/46 

012746 
016 746 
012746 
104437 
062706 

012 746 
012746 



000240 



00002 7 
1777/ 7 
000001 
003101 
013073 



165064 

001044 
005053 



\n 1 1 1 

166362 



145//2 
1457/0 
145//4 
002/26 

000300 
024036 
145656 

000005 

000010 

000 500 
023660 



. SBTTL HARDWARE TEST - INTA - 

. ♦ * ±m + ±± + *+.* + 4, + + *± + **, + * + ** + + + + +,+.* + + + +.* + * + ** + + ± + ** + + + + * + + + + *. + ** + + + + * + + + + *' + *4-* + + 

• INTERRUPT TEST - 
THIS TEST VERIFIES THAT THE DEVICE UNDER TEST (DUT) Will GENERATE 
RECEPTION AND TRANSMISSION INTERRUPTS CORRECTLY. THIS TEST DOES 
NOT DEPEND ON THE USE OF" THE SERIAL LIN>: TRANSMISSION OR RECEPTION 
CAPABILITIES OE THE DUT. THE LINES ARE PUT IN INTERNA! l.OOPBACK 
TO MINIMIZE ANY EXTERNAL EFFECTS THAT COULD BE CAUSED ON DEVICES 
ATTACHED TO THF SERIAL LINES. 



I* 

* 
* 
♦ 



J - * 



**#,*♦*♦ + ******* + **♦*** + + ** + + ♦** + * + + * + *** + ******* + ******* + * + + * + + ** + + + + + ** + + * 



146066 
146042 
147514 
147510 
147504 



BGNTST 

SETPRI CPRI05 



TNUM *- TNU1 ♦ 1 
MOV OTNUM.TSTNUM 
MOV O-l.CTRLCF 
MOV Ol.ERRTYP 
MOV 0*601. »ERRNBR 
MOV 0EM2601. .ERRMSG 



I ALLOW THE ETC TO 



T?5 
INTERRUPT 



j INCREMENT THE ASSEMBLY TIME 
i SET UP THE; TEST NUMBER. 



MOV tfPRI05.RO 
TRAP CJSPR1 
TEST COUNTER. 
( P.6 ) 



j INDICATE THAT UF. ARE IN A TEST 



j SET 
{SET 
;SET 



ERROR FATAL ERROR ftPE IN ERROR TABLE . 
FIRST ERROR REPORT NUMBER IN ERROR TABLE 
TEST ERROR MESSAGE IN ERROR TABLE. 



RESET THE DUT TO A KNOWN STATE, 00 NOT REMOVE THE 

CLEAR TX ANO RX INTERRUPT ENABLE BITS IN THE CSR . 
THIS SUBROUTINE REPORTS ERRORS FROM >>>>> 2601 THHU 



STATUS CODES FROM THE FIFO 



'602 



<<«.<< 



; - 



147462 



"it 



JSR PC.RESETT 

BCS 2* 

JMP 60* 

MOV 02603. .FRRNBR 



iREStl THE DHU 11, REPORT ANY ERRORS FOUND. 
{SKIP AROUND ABORTING FES I IF NO ERROR FOUND, 
i ABORT TEST IF EATAL ERROR FOUND DURING RESET. 
{SET THE ERROR REPORT NUMBER TO 2603, 



ENABLE TRANSMITTERS UN ALL LINES. 



4$ 



MOV 
ISR 



OMAPl NS.RS 

PC.TXENBL 



{PASS ACTIVE LINE BIT MAP. 
{ENABLE TRANSMISSION ON ALL LINES 



TEST RECEPTION INTERRUPTS. 

SET UP FOR RX AND TX INTERRUPTS: 
RX INTERRUPT SERVICE ROUTINE. INPUTS 



A CHAR ANO COUNTS THE INTERRUPT 



TX INTERRUPT SERVICE ROUTINE COUNTS TX INTERRUPT 



145/42 



CLR RXINJC 

CLR RXINTF 

CLR TXTN1C 

MOV »BUE BAS.BUf PTH 

SETVEC RXVECA.0RX1NPT 



{CLEAR THE RX 
{CLEAR THE RX 
{CI EAR THE- TX 
j I OAO THF BUFF 



INTERRUPi COUNTER. 
INTERRUPT FLAGS. 
LNTE RRUPT COUNIER. 
E R PTR UITH THE EM 



0PRI06 {SET UP INTERRUPT VECTOR 



SETVEC TXVECA,OCACHlX t OPR106 {SET UP INTERRUPT VECTOR 



TO OUCH 


RX INI , 


Mi'-v 


OPRLO?,. i'U-O 


MU\ 


oH\ LNEM , *. ■>■ 


nuv 


RXVECA. vSP 1 * 


MOV 


.?*. ,5P> 


rRAF 


CISvt.C 


ADD 


ouv-p 


TO CATCH 


t X INT . 


MtU 


... R*0". r>p ' 


MOV 


OCAL'HTX, vSP 



1 1 4 



CZDHUBO DHU-11 
HARDWARE TEST 

034.5 76 

034402 
034406 
034410 

6849 034414 
034414 
034420 

b8S0 

6851 

68S? 

6853 
r>854 
68S5 
68S6 
b857 
o858 

686C 

6861. 

686< : .' 

6863 

6864 

6865 

6866 

68b 7 

6868 

6869 

68/0 

68/1 

68 72 

6873 

6874 

6873 

6876 

68// 

6878 

6879 

6880 

6881 

688? 

6883 

^884 

6885 



F'UNC 1ST 



016/46 
012746 
104437 
062 706 

012700 
104441 



034422 
034426 
034432 
054436 



034442 
034446 



054450 
034454 
C34462 
034464 
034470 
0344 tb 
034SOO 
034504 



034506 
03451? 
034514 



034520 
034520 
034522 
034524 
034526 



»iH86 

688 7 
6888 
6889 
6890 
6891 
689?! 
6893 
>,894 
6895 



34530 
0343 56 
034540 



004 76 7 
012704 
004 767 
004 767 



00576/ 
001017 



012/01 
0327/7 

001416 
012701 
0327 77 
001410 
012701 
000405 



00576/ 
100014 
012701 



104453 
005053 
0130/* 
016136 



0.52/6/ 
001002 
000167 



PARTI 
- INT 



A - 
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5EQ 177 



145632 
000003 

000010 

000200 



165624 
000004 
163466 
165550 



145646 



013310 

000200 145560 



01322? 

100000 

013131 



145604 
013404 



145546 



6$ 



8 5 



000100 145466 
000556 



SETPRI 0PRIG4 



{ALLOW DEVICE INTERRUPTS. 



MOV 
MOV 
TRAP 
ADD 

MOV 
TRAP 



TXVECA, CSP) 
03. -CSP) 
C*5Vr.C 

010, r >P 

APR T04.R0 
C55PR1 



j ENABLE RECEPTION INTERRUPTS. 

{DELAY 4 MS TO ALLOW TIME TOR THE INTERRUPTS TO TAKE PLACE. 

{DISABLE RECEPTION INTERRUPTS. 

JSR PC.RXIE1 i ENABLE THE RECEPTION INTERRUPTS. 

MOV 04, R4 {PASS 4 MS COUNT TO THE DELAY ROUTINE. 

JSR PC, DELAY {DELAY 4 MILLI -SECONDS . 

JSR PC.RXIEO {DISABLE RECEPTION INTERRUPT^. 

i * 

{ VERIPl THAT THE CORRECT INTERRUPTS TOOK PLAC.-. 

! TEST THE INT COUNTER TO VERIFY THAT INTERRUPT*- TOOK PLACE. 



TST 
BNE 



RXINYC 
6$ 



{CHECK THE RX INTERRUPT COUNT. 

{SKIP THE EOLLUWIM, ERRORS IE COUNT <> 0. 



DETERMINE REASON FOR NO RX INTERRUPTS AND PRINT PROPER ERROR MESSAGE. 



I - 



MOV OEM2604.R1 

BIT cBIT7,aCSRA 

UEQ 8$ 

MOV 0EM?b03,Rl 

BIT *BIT15.S)RBUFA 

REQ 8i 

MOV 0EM26O2,fU 

BR 8$ 



;SET UP MSG IN CASE "RX . DAT A . AVAIL. IS ClR". 
{TEST THE RX. DATA. AVAR BIT CE THE CSR . 
{GO REPORT ERROR U RX . DA TA. AVAIL IS CLR. 
{SET UP MSG IN CASE "DATA. VALID IS CLEAR'. 
{TEST THE DATA. VALID BIT 0^ THE f IE . 
{GO REPORT ERROR 'F DATA.VAIIO IS CLEAR. 
;SET UP M5G."0ATA. VALID IS SET", 
;G0 REPORT THE ERROR. 



IE RX INTS OCCURRED WITH RX . DATA , AVAIL CLEAR, REPORT THE ERROR, 



I - 



TST RXINTE 
BPL 10$ 

MOV 0EM2605.IU 



{CHECK THE RX INTERRUPT MACS. 
{SKIP THE ERROR U K.AU 1> tLEAR, 
{SET 1>P THE PROPER MESSAGE. 



j REPORT THE ERROR WHICH HAS BEEN FOUND. 
ERRDF 2603 , EM260 1 , E R0503 } 



>>»»» ERROR #2603 n<<« 


t 


TRAP 


:$i rde 


. WORD 


?t>0 * 


.WORD 


k M?e>01 


. WORD 


ER0503 



EXIT THE TEST IE EXTENDED ERROR REPORTING HAS NOT BEEN ENABIED 



i ■ 



BIT 0{UlU6 i UPTlON 
BNt , *t 
JMP »>4 1 



{EXIT WITH US! UULURt NESSAi.E U 

|NU tXTENDEQ ERRUR REPORTING HAS UtLN REUUE5TL0 



C/DHUOO DHU-11 FUNC TST PARTI 
HARDWARE TEST - INTA 



4 
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SEG 178 



689b 
689 / 
6898 
6899 
6900 
6901 
6902 



0**03 
6904 
6905 
6906 
690 ; 
6908 
6909 
6910 
69U 
6912 
6915 
691«l 
6915 



6916 



6917 



6918 
6919 

6920 

69.n 

6922 
6923 
6924 
6925 
6926 
692/ 



034544 

034550 

034552 
034556 
034556 
034560 
03456,? 
034564 



6928 



054566 

034574 
034576 



054602 
054602 
054606 
034610 
054610 
054614 
054616 
054616 
034622 



6929 



054624 
034630 
054634 
034640 
054640 
054644 
034650 
034654 
034660 
034662 
034666 
034666 
0546 72 
0546 76 
054 702 
<M4 706 
054/10 
054/14 
054/14 



016702 
001414 

012701 

104455 

005054 
0130/3 
016174 



05276 7 
001002 
000167 



012 700 
104441 

016700 

1044 36 

016/00 
104436 



00506/ 
005067 
00506/ 

012746 

012746 
016746 
012/46 
1044 5/ 
062/06 

012 746 
012/46 

016/46 
012/46 
104437 
062706 

012 700 



145556 
007505 



000300 
145416 
145412 



145464 
1454 7c 1 
1454 70 

000500 
025652 

145356 
00000 5 

000010 

000300 
024146 
145332 
000003 

000010 

000200 



VERIFY THAT NO TX INTERRUPTS HAVE BEEN GENERATED 50 FAR TN THIS TEST. 



10$ 



MOV TXINTC.R2 jLOAD Of TX INTERRUPTS FOR ER0504 RTN. 

Bfc'Q 12$ j SKIP ERROR IF NO TX INTERRUPTS. 

{REPORT "TX INTERRUPTSCS) RECEIVED WITH TX INTERRUPTS DISABLED." 

MOV OEM0526.R1 jSET UP MESSAGE ADR FOR INDIRECT PRINT. 



ERRDF 



?604,EM2601,ER0504j 



>>>>> ERROR #2604 < < « < < 


g 


TRAP 


CJERDF 


.WORD 


2604 


.WORD 


EM2601 


.WORD 


ER0504 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



000100 145430 
000520 



BIT 0BIT06, OPTION 
BNE . *6 

JMP 34 $ 



{EXIT UITH TEST FAILURE MESSAGE IF 

{NO EXTENDED ERROR REPORTING HAS BEFN REQUESTED 



CLEAN OUT THE INTERRUPT VECTORS USED IN THIS TEST, 
12$: 



SETPRI 0PRIO6 
CLRVEC RXVECA 
CLRVEC TXVECA 



{DISABLE DEVICE INTERRUPTS. 

MOV 
TRAP 

{RETURN RX INT VECTOR TO UNUSED POOL 

MOV 
TRAP 

{RETURN TX INT VICTOR TU UNUSED POOL 

MOV 
TRAP 



0PRI06.R0 
CSSPRI 

RXVKA.RO 

CtCVEC 

TXVECA, RO 
CSCVEC 



i 



TEST TRANSMISSION INTERRUPTS, 

SET UP FOR RX AND TX INTERRUPTS: 

RX INTERRUPT SERVICE ROUT INF COUNTS RX INTERRUPTS. 

TX INTERRUPT SERVICE ROUTINE COUNTS THE INTERRUPT AND SETS FLAGS. 

CLR RXINTC {CLEAR THE RX INTERRUPT COUNUR. 

CLR TXINTC {CLEAR THE TX INTERRUPT COUNTER. 

CLR TXINTF j CI EAR THf RX INTERRUPT MAGS, 

SETVEC RXVECA, OCACHRX.OPRIOfo jSET \JP INTERRUPT VECTOR TU CATCH RX INT. 

MOV OPHIOb. tSPl 

MOV OCACHRX, CSP) 

MOV RXVECA. -;SP) 

MOV 03, (SP) 

TRAP C*5VEC 

ADD 010. SP 
SETVEC TXVECA, 0TXINTR, 0PRI06 (SET UP INT VECTOR TU TX INT ROUTINE. 

MOV 0PR106, UiP ) 

MOV 0TX1NTR, i^ f ) 

MOV TXVECA, ^SP^ 

MOV 03, (SP) 

TRAP CiSVEC 

ADD 010 ,S p 
SETPRI 0PR104 (ALLOW DEVICE INTERRUPTS. 

MOV 0PR1O4.R0 



l< ! 4 



CZQHUHO 
HARDWARE 



DHU 1 1 

test 



KUNC 1ST 



034720 104441 



6930 
6931 

6933 
6934 
6935 
6936 
6937 
6938 
6939 
r>940 
6941 
6942 
6943 
t>944 
6945 
6946 
694 7 

6948 
6949 



6950 

6951 

6952 

6953 

t.954 

6955 

6956 

695 / 

b958 

695^ 

6960 

6961 

696? 

6963 

6964 

6965 

b966 

t>967 

<>968 

f»96^ 

♦ .970 

6971 



69/2 
69 / *> 
69 74 
69/5 

69 /ti 

6977 



034 722 
034726 
034732 
034736 
034742 
034746 
034752 
034754 
034 756 
034 762 
034 764 
034 766 

034 7 70 
034 774 

034776 
035002 
035002 
035004 
035006 
035010 



035012 
035020 
035022 
035026 



035030 
035034 
035040 
035044 
035050 
035052 
035056 
035062 
035064 

0350/0 

0350 70 
035072 
0350 74 
035076 



035100 
035106 



012705 
012701 

012702 
016704 
012703 
004 76 7 
103026 
005003 
004767 
103005 
005305 
001365 

012701 
000402 

012701 

1044C5 
005055 
013467 
016136 



032767 
001540 
004 767 
000430 



004 767 
012704 
004^67 
005767 
001417 
012701 
00576 7 
100002 
012701 



104455 
005056 
013467 
016136 



032/6/ 
001500 



PARTI MACRO M1200 
- INTA - 



000022 
000144 
1000CO 
145300 
100000 
163326 



163316 

013526 
013632 



000100 
166006 



166000 
000062 
163060 



013526 
145246 

013673 
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VERITY THAT THE TX ACTION BIT IS CLEAR, 



SF.O 179 



TRAP 



CSSPRI 



14$ 



MOV 


Oi8. ,R5 


MOV 


0100, ,R1 


MOV 


OBIU5.R2 


MOV 


C5RA.R4 


MOV 


OBIT15.R3 


JSR 


PC.MSLOOP 


BCC 


20$ 


Cl.R 


R3 


JSR 


PC.MSLOOP 


BCC 


16$ 


DEC 


R5 


BNE 


14$ 



, INITIALIZE THE LOOP COUNTER. 

j SET 100 MS TIME OUT. 

I SELECT TX ACTION BIT TO TEST 



CLEAR. 



{REPORT "TX ACTION SET 

MOV OEM2607.R1 

BR 18$ 

16$: MOV 0EM2608.R1 

18$: ERRDF 2605.EM2606 



»PASS DUT CSR AS THE WORD TO TEST 

WAIT FOR TX ACTION TO BE SET. 

WAIT UP TO 100 MS FOR TX, ACTION 

IF TIME-OUT, CONSIDER TX_ACTION 

NOW. WAIT FOR TX ACTION CLEAR. 

WAIT UP TO 100 MS FOR TX ACTION CLEAR. 
j IF TIME-OUT, REPORT TX ACTION WON'T CLEAR, 
{DECREMENT THE TX ACTION SET COUNTER. 
{LOOP IF NOT TOO MANY TX ACTIONS FOUND. 
REPEATEDLY AFTER RESET, NO DATA SENT." 
j SELECT ERROR MESSAGE. 
:G0 TO REPORT THE ERROR. 



{SELECT 
.ER0503; 



TX_ACTION STUCK SET MSG 



145204 



EXIT THE 

BIT 

BEQ 
JSR 
BR 



>>>>> ERROR 02605 <<<<< 

TRAP 

.WORD 
. WORD 
.WORD 



IF EXTENDED ERROR REPORTING HAS NOT ULEN ENABLED 



C$ERDF 

2605 

EM2606 

ER0503 



0BIT06, OPTION 

34$ 

PC. rxiEi 

24$ 



EXIT UITH TEST FAILURE MESSAGE IF 
NO EXTENDED ERROR REPORTING HAS BHN ^EUUtSTED 
ENABLE TX INTERRUPTS FOR THE TX„1NT TEJTING, 
GO TO TEST WITH TX ACTION SET, 



VERIFY THAT NO INTERRUPTS OCCUR UITH TX. ACTION CLEAR 



20$ 



JSR 

MOV 
JSR 

Tsr 

BEQ 
MOV 
1ST 

BPL 
MOV 



PC.TXIF 1 
050. ,R4 
PC. DEL AY 

TXINTC 
24$ 

0EM260/.R] 
TXINTF 



0EM2609.R1 

{REPORT -TRANSMIT INTERRUPT TEST ERROR ;,,. " 
22$: ERRDF 2606 .EM2606.ER0503 j 



{ENABLE TX.. INTERRUPTS. 

{PASS 50 MS TIME TO THE DELAY ROUTINE, 
{DELAY 50 MILLI -SECONDS TO ALLOW INTS T 
{TEST THE TX INTERRUPT COUNT. 

SKIP >.E ERROR IF NO TX INTERRUPTS. 

SELEC'i MESSAGE IN CASE TX INT FLAG CLE 

TEST THE TX INTERRUPT FLAGS. 

GO REPORT ERROR V TX FLAG IS CLEAR. 

TX FLAG IS SET, SELECT PROPER ERROR ME 



OCCUR 
AR. 
Si SAGE . 



v > > > > 



t « 4 4 < 



000100 145116 



ERROR 02606 

TRAP 
.WORD 
.WORD 
.WORD 



EXTT THE TEST TF tXTENDFD ERROR REPORTING HAS NUT BEEN ENABLED 



C$FW[)E 

2t>0t> 

EM2t>0t. 

ER0503 



BIT OBI T06, OPT ION 

GEU 12% 



jEUT WITH I ESI FAILURE Mt SSAGt I» 

iNO EXTENDED ERROR REPORTING HAS BEEN REOUESTtD 
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HARDWARE TEST - INTA - 
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PAGE 122-4 



SEQ 180 



69/8 
6979 

6980 

6981 

6982 

6985 

6984 

6985 

6986 

698? 

6988 

o989 

6990 

6991 

6992 

699? 

6994 

6995 

6996 

6997 

6998 

6999 

7000 

7001 

7002 

7003 

7004 

7005 

7006 

700 7 

7008 

7009 

7010 

7011 

7012 

7013 

7014 

7015 

7016 

7017 

7018 

7019 

7020 

7021 

7022 

7023 

7024 

A>25 

/>26 

702 7 

7028 

7029 

7050 

7031 



035110 
035114 



035120 

035124 
035130 
035134 
035140 



035144 
035150 
035152 

035156 
035164 
035166 
035170 
035174 



0351 76 
035202 



035206 
035212 



035214 
035220 
035224 
035226 
035232 



035234 
035240 
035242 



035246 
035246 
035250 
035252 



005067 
005067 



012705 
012700 
004 767 
012700 
004767 



016701 
005002 
010177 

112777 
005201 

005202 
020227 
002766 



012704 
004 767 



005767 
001010 



012701 

005777 
100410 
012701 
000405 



005 76 7 

100012 
012701 



1044r>5 

00505 7 
013467 



145212 
145210 



177777 

000200 
166416 
156430 
166436 



145140 
145064 
000000 

000020 



0003 72 
162716 



145114 



013752 
145016 

014044 



145070 

0136;: 



PREPARE TX INTERRUPT COUNTER AND FLAGS. 



24$ 



s - 



CL.R 
CLR 



TXINTC 
TXINTF 



{CLEAR THE TX INTERRUPT COUNT. 
{CLEAR THE TX INTERRUPT FLAGS. 



i SET UP LINE PARAMETERS FOR TRANSMISSION. 
J - 



MOV 0MAPLNS.R5 

MOV 420O.R0 

JSR PC.WTWLNC 

MOV 0156430, RO 

JSR PC.WTWLPR 



PASS ACTIVE LINES BIT MAP. 
PASS INERT STATE. INTERNAL LOOPBACK. 
DISABLE RECPTION AND DMA, ETC. ON OUT. 
SPECIFY 9600BPS.1STOP.no PARITY .8BITS/CHAR . 
j WRITE TO ALL L PR REGISTERS. 



SEND A NULL CHAR TO EACH LINE, 



25$ 



145064 



MOV 
CLR 
MOV 

MOVB 
INC 
INC 
CMP 
BI.T 



IESTAT.R1 

R2 

Rl.SCSRA 

aO.QFDATA 
Rl 

R2 

R2.0NUMLNS 
255 



{SET UP THE STATE OF THE INTERRUPT ENABLE BITS 
{CLEAR THE LINE COUNTER. 

{SET UP THE LINE NUMBER AND INTERRUPT ENABLE 
{BITS IN THE CSR. 

SEND A NULi. CHARACTER TO THE OUTPUT FIFO. 

NEXT CSR CONTENTS. 

NEXT LINE. 

IF ALL LINES HAVE NOT BEEN SERVICED THEN 

BRANCH, 



DELAY 250 MIL1.1 -SECONDS TO ALLOW INTERRUPTS TO OCCUR, 



MOV 
JSR 



0250. ,R4 
PC, DELAY 



[SET UP FOR 250 MS DELAY, 
{WAIT 250 MS, 



VERIFY THAT TX INTERRUPTS OCCURRED. 



{ - 



TST 

BNE 



TXINTC 
26$ 



{CHECK THE TX INTERRUPT COUNTER. 

;SKIP THE FOLLOWING ERROR IF WE GOT TX INTS, 



DETERMINE THE REASON THAT WE RECEIVED NO INTERRUPTS. 



MOV 0f-M2610,Rl 

TST 3CSRA 

BMI 28$ 

MOV 4EM26U.R1 

BR 28$ 



jSET l"P MSG IN CASE "TX ACTION IS SI f". 

{CHECK THE OUT CSR. 

GO TO REPORT ERROR IF TX ACTION Is SET, 
SET UP "TX ACTION NOT SET" MESSAGE. 

GO AND REPORT THE ERROR. 



CHECK TO VERIFY THAT TX_ACTION WAS SET FOR EACH INTERRUPT. 



26$ 



1ST tXINTF 
BK. 30$ 
MOV 3EM2609.R1 



CHECK THE TX INTERRUPT FLAGS. 

SKIP ERROR U TX ACTION CI H H.Au IS CI EAR. 

SET LJP TX INT WITH "TX ACTION CLR' MSG. 



28$ 



REPORT "TRANSMIT INTERRUPT TEST ERROR}...." 
ERRDF 2607 , EM2606 , ER0503 j 



>>>>> ERROR 42607 »■*«**. 

TRAP C$tRDF 

, WORD 260 ' 
,WURD EM2606 



M14 



CZDHUBO OHg-11 
HARDWARE Ti-Sl 



7032 
7033 

7034 
7035 
7036 
703? 
7038 
7039 
7040 
7041 
7042 
704 3 
7044 
/045 
7046 



7047 
7043 
7 049 
7050 
7051 
7052 
7053 



7054 
7055 



7056 
7057 
7058 



7059 
7060 



TUNC 1ST 



PARTI MACRO 
- INTA - 
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SEQ 181 



035254 016136 



035256 
035264 



035266 
035272 
035274 

035300 
035300 
035302 
55304 
0X5306 



035310 
035312 
035316 
035322 
035322 
035326 
035330 
035330 
035334 
035336 
035336 
035342 

035344 

035350 
035350 
035354 
035356 
035356 
035356 



104455 
005060 
013467 
016174 



005001 
004 767 
004767 

012700 
104441 

016/00 
104436 

016700 

104436 

005067 

012700 
10*441 



104401 



165456 
164670 

000300 

1446 76 

144672 

144736 
000340 



.WORD 



032767 000100 144740 
001411 



016702 145022 

001406 

012701 007415 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



BIT OBIT06, OPTION 
BEQ 32* 



jEXIT WITH TEST FAILURE MESSAGE IF 

j NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 



VERIFY THAT NO RX INTERRUPTS HAVE BEEN GENERATED SO FAR IN THIS TEST. 
30<: 



MOV 
BEQ 
MOV 



RXINTC.R2 

32$ 

0EMO525.R1 



LOAD OF RX INTERRUPTS FOR ER0504 RTN. 
SKIP ERROR IF NO RX INTERRUPTS. 
SET UP MESSAGE ADR FOR INDIRECT PRINT. 
{REPORT "RX INTERRUPTSCS) RECEIVED WITH RX INTERRUPTS DISABLED." 

ERRDF 2608,EM2606,ER0504} >>>>> ERROR V/2603 <<<<<. 

TRAP CJF.RDF 
. WORD 2608 
. WORD EM2606 
.WORD ERO504 



CLEAR BOTH TRANSMITTER 
INTERRUPT ENABt E AND RECEIVER 
INTERRUPT ENABLE BITS IN THE OUT CSR. 
DISABLE DEVICE INTERRUPTS. 

MOV 
TRAP 
j RETURN RX INT VECTOR TO UNUSED POOL. 

MOV 
TMAP 
jRETURN Ta INT VECTOR TO UNUSED POOL. 

MOV 
TRAP 



! DIS 


ABLE INTERRUPTS AND 


32$ t 
34$: 


CLR 
J5 n . 
JSR 
SETPRI 


Rl 

PC.TXIEO 

PC.PXIfcO 

0PRI06 




CLRVEC 


RXVECA 




CLRVEC 


TXVECA 


60$: 


CLR 
SETPRI 


CTRLCF 
4PRIQ7 



{INDICATE THAT WE ARE NOT WITHIN A TEST 
{DISABLE ALL INTERRUPTS. 

MOV 
TRAP 



ENDTST 



L 10054: 



TRAP 



0PRI06.R0 
C*SPR1 

RXVECA. RO 
CSCVEC 

TXVECA, RO 

C$CVEC 



3PRI07.RO 
CJSPRI 



CSE 1ST 



N14 



UA^M' FUNC T5T PA g^ l . E VA MACR ° M120 ° 
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SEQ 182 



7062 
706 3 
7064 
70b5 
7066 
7067 
7063 
7069 
70/0 
70/1 
707c? 
7073 
7074 

7075 



7076 
7C77 
7078 
7079 
7030 
>u?l 
708c'' 
7083 
7084 
7085 
7086 
7037 
7088 
7089 
7090 
7091 
7092 
7093 
7094 
7095 
7096 
709 / 
7098 
7099 
7100 
7101 



7102 



035560 
035260 
035360 
035360 
035364 

035366 
0353/4 

035402 
035410 
03541b 
035424 



7103 

7104 
7105 

7106 
7107 



0354 30 
0354 34 
0354 36 
035442 



035450 
035454 



035460 
035460 
035464 
035466 
035466 
0354 72 
0354 76 
035502 
035506 
03551U 



012 700 
104441 
000030 
012767 
012767 
012767 
012/67 
012767 
005067 



004767 
10340? 
000167 
012767 



012/05 
004767 



012 700 
104441 

012746 

012746 
016746 
012746 
104437 
062706 



00OL>40 



000030 
177777 
000001 
005671 
014223 
145032 



16372 t : 

000644 
005673 



177/77 
165220 



000340 



000340 
024 146 

144532 
000003 

000010 



SBTTL HARDWARE TEST - BRLEVA - 

♦ ♦ 4******, + * + ** + ** + + *** + + ** + + + + * + + + + + + + + + + + + + * + * + * + + + + 4-* + + -* + * + + + * + + + * + ** + + + + **. 



■ BR LEVEL TEST 3 - 
THIS TEST VERIFIES THAT THE DEVICE UNDER 
RECEPTION AND TRANSMSSION INTERRUPTS AT 



TEST (DUO WILL GENERATE 
THE CORRECT DR LEVEL. 



144730 
144 /04 
146356 
146352 
146346 



THIS TEST DOES NOT DEPEND CN THE USE OF THE SERIAL LINE TRANSMISSION 
OK RECEPTION CAPABILITIES OF THE OUT. THE LINES ARE PUT IN INTERNAL 
LOOPBACK TO MINIMIZE ANY EXTERNAL EFFECTS THAT COULD BE CAUSED ON 
DEVICES ATTACHED TO THE SERIAL LINES. 

4 t + 4( + * + *+***4 l 4 l + 4L + 4 l +* + *+.* + * + * + + t* + 4 + + + ++ + + + + * + + + + + * + + + + + + + +++ + + + + + + +* + * + + + + + + 

T24: t 

{ALLOW LTC INTERRUPTS. 

MOV tfPRI05.RO 
TRAP CJSPRI 
INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
SET UP THE TEST NUH6ER. (30) 
INDICATE THAT WE ARE IN A TEST. 
SET ERROR TYPE AS FATAL IN ERROR TABLE. 
SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
SET ERROR MESSAGE ADDRESS IN ERRTBL. 
INITIALIZE THE "REPORT ERROR SUMMARY** FLAGS. 

RESET THE DUT TO A KNOWN STATE, DO MOT REMOVE THE STATUS CODES FROM THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR . 
THIS SUBROUTINE REPORTS ERRORS FROM >>>>> 3001 THRU 3002 <<<<<, 



BGNT5T 




StTPRI 


0PRI05 


TNUM » 


» TNUM » 1 


MOV 


tfTNUM.TSTNUM 


MOV 


•-1.CTRLCF 


MOV 


tfl.ERRTYP 


MOV 


03001. .ERRNBR 


MOV 


tfEM3001,ERRhSG 


CLR 


ERSMRF 



146320 2$: 



JSR 
RCS 
JMP 
MOV 



PC.RESETT 
2% 

60$ 

tf3003. , ERRNBR 



RESET THE DHU-11, REPORT PNY ERRORS FOUND. 
SKIP AROUND ABORTING TEST IF NO ERROR FOUND. 
ABORT TEST U FATAL ERROR FOUND OURING RESET 
SET THE ERROR REPORT NUMBER TO 3003. 



ENABLE TRANSMTTTFRS ON ALL l.INFS. 



4$: 



MOV tfMAPLNS.R5 
JSR PC.TXENBL 



j PASS ACTIVE LINE BIT MAF . 
jENABLF TRANSMISSION ON ALL LINES 



GENERATE A TRANSMISSION INTERRUPT REQUEST. 
PROCESSOR PRIORITY SHOU'.D BE AT 7 DISABLING INTS. 



SETPRI tfPRI07 



jDISABl.E ALL INTERRUPTS 



SETVEC TXVHCA,tfTXINTR,tfPRI07 jSET UP INTERRUPT VECTOR 



MOV 


tfPRI0 7.R0 


TRAP 


CSSPRI 


TO CATCH 


TX TNT. 


MOV 


tfPRIO/, CSP> 


MOV 


tfTXINTR, l -ir' 


MOV 


TXVECA, ■ CSP) 


MOV 


tf3, C'Un 


TRAP 


C$SVEC 


ADD 


tflO.SP 



■FT UP OUT FOR TRANSMISSION INTERRUPTS: 

SET UP INTERNAL LOOPBACK. 

SET UP LINE PARAMETERS FUR TRANSMISSION. 



B'l 



C. T 0HIWU OW 11 


KUNC TST 


PARTI MACRO 


HARDUARE TEST 




- BRLEVA ■ 


.'108 035514 


012/05 


1 / 7 / / / 


710* 035520 


012700 


000200 


7U0 035524 


004 76 7 


166022 


7111 035530 


012700 


156430 


71 1J 035534 


004 767 


166042 


7115 






7U4 






nis 






7 Ut. 035540 


016701 


144544 


711 ,* 035544 


010177 


1444 /2 


7 1 1 H 






711** 035550 


11277/ 


000000 14447 


71^0 03555*. 


005201 




7un 035560 


02012/ 


000020 


7UV 035564 

7h^ 

7U?4 

71J5 

7126 055566 


002 '67 




012/04 


000062 


7UV 035572 


004 76/ 


162326 


7l,?8 






7K»9 






7130 






7131 0555/6 






0555/6 


012/46 


000340 


03560 > 


012746 


023756 


035606 


016/46 


144420 


03561. 1 


012 746 


C 0000 3 


055616 


10445/ 




035620 

',M(i 


062/06 


000010 


'.'13 3 






7154 






7135 35624 


012/05 


000340 


71 *t, 035630 


00500 3 




7M: 035632 


005002 




71 ^A 






713W 






7140 






714 1 






7142 0356 34 


0O4 /6 / 


164412 


714 3 035640 


004 76 7 


165170 


7144 






7145 






714H 






'14/ 35644 


00506/ 


144456 


7148 035650 


00506/ 


144454 


7141 035654 


00506/ 


144434 


7150 35660 


0O506 7 


144432 


7151 035664 






035*64 


01050O 




35666 


10444 1 




7152 35f, /O 


012/04 


000001 


715 •. 0356/4 


004 70/ 


162224 


7154 
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st; a is 7 



MOV 0ttAPl.NS.R5 

MOV #200 »R0 

JSR PC.WTWl.NC 

MOV Oi56430.RO 

JSR PC.WTWLPR 



jPASS ACTIVE I INF. 5 BIT MASK, 

I PASS INERT 5TATF, INTERNA! l.OOPRACK, 

, DISABLE RECPTION AND DMA, ETC. ON DUT . 

I SPECIFY 9600eP5.1S r OP,NO PARI TY ,8BITS/CMAR. 

jWRITE INTO ALU LPR REGISTERS. 



5$ 



i SEND A Nat CHAR TO EACH LINE. 

MOV IESTAT,R1 
MOV Rl.QCSRA 



MOVR 
INC 
CMP 
BLT 



OO.SFDATA 

n: 

R1.0NUMI.NS 
51 



jSET UP THE. STATE Of THE INTERRLPT ENABLE BITS. 

I SET UP THE LINE NUMBER AND INTFRRUPT ENAHl E 

iHlTS IN THE CSR. 

iSENO A NU L CHARACTER TO THE OUTPUT F iKJ . 

iNF.XT LINE. 

I IF ALL LINES HAVE NOT BEEN SERVICED THEN 

I BRANCH. 



I'dELAv 50 MS TO All OW TIME FOR THE INTERRUPT TO BE GENERATED. 

I * 

MOV #50., R4 jPASS 50 MS TIME TO TK DELAY ROUTINE. 

JSR PC, DELAY iDElAv 50 MILL I SECONDS, 

j GENERATE A RECEPTION INTERRUPT REQUEST. 

SETVEC RXVECA.ORXBRPT.OPRIO/ |SET UP INTERRUPT VECTOR TO CATCH R< INT. 



MCV 

MOV 

MOV 

MOV 

TRAP 

ADD 



•PR 10/. (SP) 
#RxBRRT, ( ,P ) 

RxvECA, (SP^ 
#5, (SP) 
CISVEC 
•10, SP 



j SET UP FOR THE I OOP WHICH TESTS THE INTERRUPT RR I F. Vt I S . 



MOV 


340.R5 


ClR 


R3 


Ct R 


R2 



t si T UP f M| PRIORI? ? I EVE I TO 7. 

j CI PAR THf RX PR I OR II' STORE AND M.AL.s. 

lC* EAR THE TX PRIORIH S r ORE ANO FLAGS, 

l • 

I ENABLE Tx ANO MX rMHRHuPTS. 

j PROCESSOR PRIORITi SHUU D Bi A T .' OISABt TNG THE INTFRRIPTS, 



JSR 
JSR 



pc.rxh l 

PC»TxTE 1 



.-I NAHl F RECEIVER INTERRUPTS. 
jENABlF TRANSMIT TFR INTERRUPTS. 



j I OOP, LOWERING THf PROCESSOR PRIORITY UNT 11 THf OUT INTERRUPTS UN RX AND TX. 



i 

6i 



Ci R 
Ci R 
CI R 
CIH 
SET PR I 



MOV 
JSR 



I <!NK 
1 - INM 

MXINTC 
R»,INTF 
R5 



• I, R4 
PC, OH A i 



iclear ihe tx interrupt counter. 
, Clear the tx interrupt flags. 

4 CHAR [H(. RX INTERRUPT CUtWtM. 
jClEAR THE RX INTERRL^T MAGS. 

|SET PROCESSOR PRIORITi JO THE SELECTED i. 'U t. 

MOV R r ,M^ 

T R AF* " $ SPR 1 

iPAss I MS COtJNl '0 THf OH At ROUTINE. 
lOHAt l M\ To AiiOW INTERMITS TO OCCUH. 



nu* 



l OF Tl.RMINt I' AN» R« DL" IN l\ RHijP 1 s uCCl^RED . 

1 LOG THE HRUCt^SUR HtUUKItl FUR THfc MX iNTtHRuPt U E'lR^f Rx IHt . 



C 1 '.. 



c^dhuho omu n 


>'UNC TST 


PARTI MACRO 


HARDWARE Tt ST 




BRlEVA 


7 is 7 

*isn 035700 


005 76 7 


144410 


'V^ 035704 


00141P 




71 to 






'.MM 






n<^ 






7163 035706 


005 703 




vim ossao 


001010 




vibS 035712 


010503 




7U.b 03S714 


OV/03 


100000 


?1^' 035720 


016 700 


1443/i* 


vita 035724 


0447 700 


137777 


7 It/* 035730 


050003 




a *o 






a a 






a.\? 






71 ,? 






71 .'4 u3S.'V 


OoS 7f» 7 


1443/0 


't 75 035 736 

v : 76 


001405 




7i n 
7i :a 






V\>* 055 740 


OCS 70»» 




7180 OSS 74^ 


10O40S 




7iH I 03S/44 


01 050*' 




7irt t ' 035746 


05270c? 


100000 


; l ft 3 






7184 






a as 






7166 






7187 035/5;* 


IF..' 705 


000040 


7188 035 756 


OOiMO, 1 




VI 8S 03S/60 


0SO. J 03 




71**0 03576? 


100330 




71'U 






a<v 






ass 






71<>4 035 'M 






OSS/64 


OU'/OO 


OC0340 


OSS 7/0 


104441 




7195 u35//«? 






035/7*? 


016/00 


144^34 


OSS 7 76 


1044S* 




?l<*f» 36000 






036000 


016 700 


144^30 


036004 
71 'J 7 
7 I'M 


104436 








Vt'# , # 






Vi?00 






'.Vol 






V*MV 






Vi'OS 0S6006 


OOS 70,' 




<Vu4 0360X0 


1004^0 




7.'()S 
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iCHfcCK THE RFCElVf INTERRUPT COUNTER. 

I SKIP THE PRlORITf LOG IF NO RX INT OCCURRED. 



I CHECK JHl RX PRIORITY STORE ANO MAl.'i, 

l"30T0 TEST FOR TX INTS JF NOT THE FIRST RX INT, 

jt OG THE PRESFNT PRIORITY IN THE RX PRIO STORK. 

jSET THfc RX INT HAS OCCURRED F'l At, . 

I GET THE RX INTERRUPT ROUT INF. ELAG5. 

iCLEAR ALL BUT THE TX INT ERROR F LAG. 

lIF TX INT ERROR, r ^E T BIT 14 OF THE PRTO MAGS. 

j DETERMINE IF ANY TX OUT INTERRUPTS HAVE OCCURRED. 

I LOG THE PRESENT PROCESSOR PRIORITY IF THIS IS THF. FIRST TX INTERRUPT, 



TST 


RXINTC 


be a 


HI 


1 • 
\ IF 


THIS IS THL F 


*TST 


RS 


FJNF 


8$ 


MOV 


R5.R3 


HIS 


06IT15.WS 


MOV 


RXINTF ,R0 


BIC 


0137777, RO 


BIS 


RO.RS 



8$ 



jCHECK THE TRANSMIT INTERRUPT COUNTER. 

I SKIP THE PRIORITY I OG IE NO TX INT OCCURRED. 



lOt 



TST TXINTC 

BEO 10* 

j IF THIS IS THE FIRST TX INTERRUPT, LOG ^ PRIORITt. 

TST R,> iCHECK THE TX PRIORITt STORE AND FLAGS. 

BMI 10$ j SKIP THE LOGGING IF NOT FIRST TX INTERRUPT. 

MOV RS.R.'.' |l.OG THE. PRESENT PRIOR IT i IN THE TX PRIO STORE. 

EilS WIT1MV (SET THE TX INT HAS OCCURRED FLAG. 

i SELECT NEXT PROCESSOR PRIORITi, 

j TEST FOR BOTH RX AND TX INTERRUPTS HAVING OCCURRED, LOO IF NOT. 

SUB 040, R5 iDECREHENT PRIORITY l E VEt Rt ONE . 

BLT \Jt jGOTO CHECK I OR ERRORS IF BELOW PRIORITi ZERO. 

HIT R*\R3 jANO PRIO FLAGS TOGETHER, ALTER NOW OF THEM. 

BPL 61 ilOOP IF MX ANO Tx INTS HAVEN'T BOTH OCCURRED. 



DISABLE INTERRUPTS ANO CI EAR INTERRUPT VFCTOR 
li?S; 



SEQ 184 



SETPRI 0PRIO7 
CIRVEC RXVECA 
Cl.WVEC TXVECA 



lUlSARi i ALL INTERRUPTS. 

MOV 
TRAP 

I RE TURN RX INT VE'CTOR TO UNUSED POOt 

MOV 
TRAP 

(RETURN TX 1W VECTOR TO UNUSED POO* 

MOV 
TRAP 



OPRIO'.RO 

CJ'.PRI 

Rxvl CA,RO 
CICVEC 

T x vt uA,RO 
OCVEC 



i 



VjOV 



• VERIF i THAI RX AND TX INHHHUPTS OCCURRED, 

j AT THE PROPER BPllvH, AND 

, IN THF. PROPER QRDl R. 

j DETERMINE U Tx INTERRUPT UCOWOD. 

! ;T R. »DMt RHINE VJMtTHtR T\ INT XCi«RtD OR NOT, 

BMI 1M | SIMP TMISE ERRORS U TX INT UCL'URRtU • 

j UL TERMING REASON THAI NO TX INT OCCURRtU. 
i ' 



mm& i w 



l F UNC TST V 



■mt 



EVA 



MACRO Ml/OO lb MAP 84 09; IS 
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SEU 145 



7/08 
7/0* 
".V10 
/JU 
.Vl. % 
7J13 



03601/ 
03bOl6 
0360*}/ 
0360^4 

036030 
0360*0 
03603c 1 
360 54 

036036 



7/14 
■'.US 

;vir> 

'//l ' 
7/18 

7/1* 
;\vo 
/.vi 

■V/5 
7//4 
7/25 

7//6 

7,V? 

''■nq 

7 /SO 

7/3 L 
7/5/ 
7/5 5 
7/54 
7/35 
7/ 5b 
7/5/ 
7/38 



7/4 n 
//4i 

7/4/ 
7/4 5 
7/44 
//4S 
7/46 
7/4 7 
7/48 
7/4* 
7/50 
7/51 

"Fit i 
' • >. 

7/5 5 

7/S4 
/. V- 
'/5b 



036040 
5b 04b 



01/701 
005/7/ 
10040/ 
OliVOl 



104455 
0056 7 3 
014//* 

016136 



5/76/ 

001M5 



01375.? 
144//0 

014044 



036050 0004/7 



03605/ 
036054 
036060 
05606/ 

036064 

036066 
0360/0 
0560// 
0560 74 
036 100 
03b 10/ 

56104 
056110 
O56U0 
56 11/ 
05b 11 4 
036116 



5b 1 /O 

0361/6 



05b 150 

05615/ 



: »bl 14 
O 5b 140 
5b 14b 
036150 



010/04 
04/704 
0O6/04 
006/04 
0O6P04 
006/04 
006/04 
OOV04 
116 70S 
1/0405 
00141/ 



5/ 7f, ; 
001463 



005/03 
1004/1 



01/701 
5..'/.' 

ooloo/ 

Oli? 701 



177400 



144140 



01/701 014356 

104 155 

0056 74 
014// 5 
0166/0 



I4$s 



000100 144156 



H141/7 

000. '00 

014/6/ 



16* 



000100 144076 



18* 



144074 



MOV OEM/610, Rl 

1ST &CSRA 

RM1 14$ 

MOV *EM261 1 .,R1 

,RtP0RT "INTERRUPT BR I EVEL. 



iSELECT "NO Tx INT F MOM TX, ACTION" MESSAGE. 
, CHECK THE TX, ACT TON BIT Of THF OUT C5R. 
(SKIP TX. ACTION CI R M5G SELECTION IF IT I L. '.,h \ 
INFLECT "TX.ACTION Cl EAR AFTER CHARS SENT" MsT, 
TEST ERROR:" 



F.RRDF 3003.EM3001.ERO503, 



ERROR 



03003 

TRAP 

.WORD 
.WORD 
. WORD 



Cierde 

500 5 
EM 5001 
ER0503 



I EXIT THE TEST U EXTENDED ERROR REPORTING HAS NOT BEt N \ NABt f 1) 

B t T O0ITO6, OPTION |EXIT WITH TEST F All Ufli MESSAGE IF 

BEQ 4?6$ |N0 EXTENDED ERROR REPORTING HAS OliN REQUESTED 

HR 18$ iSKIP THE BR LEVE I. CHECK, NO TX INT OCCURRED. 

j ♦ 
i VERIFY THAT \H\ TX INTERRUPT WAS AT THE PROPER HR LEVEL. 

iCAECULATt THE BR I EVFl 

, THAT THE TRANM5IT 

t INTERRUPT WAS 

I REQUESTED AT , WHICH 

j IS ONE GREATER THAN 

j THE PROCESSOR PRIORI! t 

I I EVFL AT WHICH THE 

\ TRANSMIT INTERRUPT OCCURRED. 

jGET THf EXPECTED INTERRUPT RR IE.VEE. 

, COMPARE THE INTERRUPT BR I EVEL WITH EXPECTED. 

I SKIP THE ERROR IF BR IFVFI IS CORRECT. 
I REPORT 'TX INTERRUPT GENERATED AT wRONli BR LEVEL: 

MOV OEH500 5.R1 i SELECT THE ERROR Mt 55AUE F OR THfc ERROR CAi I . 

F.RRDF 3004,EM3001,ER300i \ >»»>» ERRUR 03004 «<<<<, 

T r *AP C <t RDF 

.WORD 5004 

.WORD EM 5001 
.WORD ER3001 

: EXIT THE TEST IF EXTENDED ERROR REPORTING MAS NOT BEEN ENAHl E 



MOV 


R/.R4 


BIC 


01 7 7400, R4 


ASR 


R4 


ASR 


P4 


ASR 


R4 


ASR 


R4 


ASR 


R4 


INC 


R4 


MOVB 


BRLEVL.R5 


CMPB 


R4.R5 


HFQ 


18$ 



BIT OBI T06, OPTION 

BEU /6$ 



jE\IT WITH TEST FAIHW Mf SSAl.E IF 

jNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 



DETERMINE l> MX INTERRUPT OCCURRED. 



tsr 

BMI 



05 
//* 



t CKCK THE RX INT OCCURRED ► L Ai, . 

i SKIP THESE ERRORS IF RX INT OCCURRED. 



DETERMINE REASON THAT NO RX INT OCCURRED. 



MOV OEM/bl/,Rt 

HIT OBtT/.olCsRA 

BNE /01 

MUv 0EM5OO/ t Rl 



|SHICT NO Hx INT FROM Rx . OAT A . Av A U MSi,. 
{CHECK T Ht Ra .DATA. AV A!i BL T » THE 0"T C >» . 
|S*IP MX. [MM, A\ All C' H MSO IF H',1 I*. SET, 
jSElELT "NO RX.DATA.AVAll AFTER RESET MS/.. 



[- I L 



C/pMlHU> OHU 
HAR" 



IOU/UU 



Tt ST 



1 I'UNC 1ST 



7258 036154 






0X6 1 >1 


104455 




05M.56 


O 56/5 




056160 


014225 




036162 


016136 




72*0 






7261 






7262 036164 


052/6/ 


000100 


:>.< o36r.v 


001441 




7264 






7.>5 036174 


000427 




72t>6 






/26/ 






72*8 






726 1 * 0561/6 


010304 




72/0 056200 


042/04 


177400 


72/1 056204 


006204 




72/2 05620b 


006204 




72/5 056210 


006204 




72/4 056212 


006204 




/2/5 056214 


006204 




/2/6 056216 


COS 204 




?iY/i 056220 


1 16 /OS 


144014 


72/8 056224 


120405 




72/<» 036226 


001412 




7280 






72rtl 036230 


012701 


014432 


/282 05^234 






56254 


1044SS 




036236 


0056 76 




05c240 


014225 




036242 


016620 




/2**« 






7284 






72HS 






7286 056244 


52/6/ 


000100 


728/ 056252 


001411 




/2HH 






72H-* 






/2W0 






7;ni 






/2S2 036254 


052/0 5 


040000 


7^i*> 56260 


001406 




/2 l »4 






/2\*5 056262 


012/01 


014506 


/2<>6 036266 






56266 


104455 




3 -li'/O 


00 S6 / / 




OK'/.' 


014 4 <»5 




036274 


016136 




■V-irt 
7 i . , w-* 






7 500 056.' /6 


004 /6 / 


lf,44 t\- 


7 301 036?02 


004 767 


163704 



PARU MACRO M1200 
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20$ 



144032 



aa% 



14 3/52 



24$ 



IS MAR 84 09:15 PAGE 123 4 



{REPORT "INTERRUPT BR t EVEl TEST ERROR:" 
ERRDK 3OO5 # EM3OOl»ER0 r ^3j 



j tXIT THfc TEST IK EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

BIT 0BIT06, OPTION jEXIT WITH TEST FAILURE Mr 5 5 AGE IE 
BEQ 26* i NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 



>>>>> ERROR 03005 <<<<< 


r t 


TRAP 


CIEHDE 


.WORD 


3005 


.WORD 


EM 500) 


.WORD 


ER05O3 



BR 



24* 



{SKIP THE. Of: CHECK IF NO RX INT OCCURRED. 



VERIEt THAT THE RX INTERRUPT WAS AT THE PROPER BR LEVEL, 



\ ' 



CALCULATE JHt RR LEVEL 
THAT THE RECEIVE 
INTERRUPT WAS 
REQUESTED AT , WHICH 
IS ONE GREATER THAN 
THfc PROCESSOR PRIORITY 
LEVEL AT WHICH THE 
RECEIVE INTERRUPT OCCURRED. 
GET THE EXPECTED INTERRUPT BR LEVEL. 
COMARt THE INTERRUPT BR LEVEL WITH EXPECTED. 
SKIP THE ERROR IE BR I EVEl IS CORRECT. 
ED AT WRONG BR LEVEL: 

SELECT ERROR MESSAGE ECR THE ERROR CALL. 
ERRDF 300b,EM3O01,ER3OOl{ »>>>> ERROR 03006 <<<<<. 

TRAP C$ERD^ 

. WORD 3006 
.WORD EM 5 001 
.WORD ER3001 

! EXIT THE TEST If EXTENDED ERROR REPORTING HAS NOT BEEN ENABl ED 



MOV 


R5.R4 ; 


Bie 


01//400.R4 i 


ASR 


R4 j 


ASR 


R4 , 


ASR 


R4 j 


ASR 


R4 | 


ASR 


R4 j 


INC 


R4 ; 


MOVB 


BRLEVL.R5 j 


CMPB 


R4.R5 j 


nru 


24$ i 


jREPORT "RX 


INTERRUPT GENERAT 


MOV 


0EM3004.R1 j 



BIT *BI T06, OPTION 

BEQ 26$ 



1 1 XI I WITH TES T FAILURE MESSAGE V 

j NO E^TENOED ERROR REPORTING HAS BEEN REQUESTED 



t TEST FOR INTERRUPTS OCCUR tNG IN THE PROPER ORDER. 

J - 

HIT 0BIT14.R5 jCHECK T Hf IMPROPf R INT ORDER ERROR HAG. 

BEQ 26$ i SKIP ERROR REPORT U ERROR DID NOT OCCUR. 

iREPORT "TX INTtRRUPT GIVEN PRECEDENCE OVER SIMUIANEOUS RX INT. 

MOV irt.M3005.Rl jStLECT THE ERROR Ml ;,SAU f OR INOIRECT PRINT. 

ERRDE 5007,EM3001,ER0503, »»»»» ERROR 03007 **»<». 

TRAP ClERDf 

.WORD 500* 

.WORD \ H5,n i 

.WORD EP05..>3 



& l AN UP, t XIT !HE T E > T . 

26$; 



JSP 
JSR 



pc.txie o 

PC.RXIEO 



iClEAR TRANSMITTER INTERRUPTS 
I CLEAR RECEIVER INTERRUPTS, 



SEQ 186 



cjOHimo OHu-n k»nc tst parti 

HARDWARE Tf ST 



7 .SO? 03ft 30ft 

7303 05ft 3 1? 
03631? 
03ft5lft 

7304 03ft3?0 
03ft 3?0 
0363?0 

,'50S 



OOS0'>7 

01? ?00 
104441 



104401 



BRll.VA 
14 3774 
000340 



MACRO M1?00 
605 
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CL.R 
SF.TPRI 



bNDIST 



CTRL C^ 
0PRI07 



tlNOICATt THAT WK -ARK NOT WITHIN A Tfc'iT. 
iOlSABLt ALL INTERRUPTS. 

MOV OPR{0/,RO 
TRAP CJSPRI 



L 10055 J 



TWAP 



C$£TST 



^tQ 167 



G'l 



^ 



C/DHUBO OUt i it FUNC TST PART I MACRO M1200 
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SE.Q 188 



7 50/ 

'•' 508 
7 UW 
7?10 
7 .ML 
"Ml 2 
7*115 
7514 
75 IS 

7516 



7 51 ; 
7518 
7 51^ 
7 520 
7 .VI 
7 522 
7'.. '5 
7 324 
7525 

7 526 

7 32/ 
7528 
7 52<> 
7 550 
7551 
75 V 
? '.55 
7 354 
7 5 V. 
75 56 
7 557 
7 5 58 
7 55 ( » 
7 540 
7 54 1 
7 542 
7 54 5 
7 544 
7 54' i 
7 ',46 
7 54 / 
7 548 
7 54 1 * 
7 5 SO 
7 551 

/v.;* 

7 5S5 
/ 5S4 
7 555 
'556 
7 55 / 
,' 55 M 



056 522 
056522 
056522 
0565.?.? 
056 V6 

056550 

056556 
56544 
056352 
056560 
056560 



0565/4 
036400 



05640.? 
05640*. 
056410 
056414 
0564 1b 
036420 



0564.?;? 
564 50 
036432 



056440 
05<,444 
03M5O 
036454 



c 12/00 

104441 
000051 
Oli? 76/ 
012767 
012 ,'67 
012767 
012/6/ 
012767 



004 /6 / 
103103 



016 /OS 
00 S 004 
016/05 
000241 
006 00 S 
103070 



012/6/ 

010415 
052777 



012/01 
.0.6/02 

I.M4 /6/ 

103042 



000240 



000051 
17/7 77 
000001 
00605S 
014600 
017222 



161402 



145622 
I436a6 



006056 
000002 



Oil /SO 
14 55/6 
164540 



1 4 3 /66 
14 3742 
145414 
145410 
145404 
145400 



145340 
143606 



. SBTTl HARDWARE TEST - OIABMP 

• » » A************************************************************************** 

t* DIAGNOSTIC FIELD (BMP) TESl 

* THIS TEST VERIFIES THAT A REQUEST TO JHi OUT TO REPORT BMP STATUS 
+ CODES IS COMPLIED WITH. WITHIN THE SPECIFIED TIME. 

* ALL ACTIVE LINES ARE TESTED. 

T25:: 
{ALLOW ETC INTERRUPTS. 

MOV 0PH105.R0 
TRAP CliiPRI 
{INCREMENT Tht ASSEMBLY TIME TEST COUNTER, 
j SE T UP THE U S T NUMBER . f M ^ 
I INDICATE THAT WE ARE IN A TEST. 
{SET ERROR TYPE AS FATAL IN E RRUH TABU . 
{SET THE FIRST ERROR NUMBER IN EHROR TABU . 
jSE! ERROR MESSAGE ADDRESS IN ERR T Hi . 
{SELECT THE. CORRECT ERROR REPORTING RUUTINL. 

RESIT THE OUT TO A KNOWN STATE, REMOVE THE STATUS CODES FROM THE FIFO. 

CI EAR TX ANO RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERROR >>>>> 5101 <<<<<. 



BGNTST 




SETPRI 


0PRI05 


TNUM - 


- TNUM ♦ 1 


MOV 


OTNUM. TSTNUM 


MOV 


0-1, CTRL CF 


MOV 


Ol.CRRTYP 


MOV 


05101. .ERRNBR 


MOV 


Of;M3l01,ERRMSG 


MOV 


0ER9101.ERRBLK 



! - 



JSR 
BCC 



PC.CLNRST 

60* 



{RESET THE DHU-11, REPORT AN> ERF<ORS FOUND. 
; RESET FAILURE/, ABORT THIS TEST. 



J - 



2$ 



TEST ALL ACTIVE LINES INDIVIDUAL L t . 

WRITE THE REUUfST COOt TO THl DIAGNOSTIC * IF.I.D IN (HI t PR REGISTER, 

VERIFY THAT A BMP CODE IS RETURNED WITHIN THE CORRECT TIML . 

jlit T THt ACHVE LINE BIT MAP. 

;f«EAR I HE I INF- NUMBER COLTER. 

ji.M TMf ADDRJ 55 Of THt DUT'S CSH . 

i CLEAR TKE CARRY BIT PRIOR TO 5HI.F I IN(i BIT MAP, 

{SHIM THE BIT MAP INTO THE CARRY BIT. 

;\)0 NOT TEST THE LINE IF IT IS INACTIVE. 

SB! CT THf I INE 'JNDEfl H.5T . 
WRITE THE BMP REULK.ST CODE TO TH r 01' At; FIELD IN THE I PR ^EOISYEH. 



MOV 


ACTl NS.R5 


CL.H 


R4 


MOV 


C5RA.R3 


Cl.C 




ROR 


RS 


BCC 


4$ 



I - 



MOV 


«3102. ,t RHNBR 


MOV 


R4.1R5) 


BIS 


02, uK PRA 



f " 



i 



/560 



{SET THE ERROR NUMBl R TO M(V. 

iSHtCT THE LINf CURRl NU t UNDER TEST. 

{WRITE THE BMP Rf Ul * 5 T COOt TO THE L PR . 

WAIT f OH BMP REQUEST CODE TO RE CLEARED, REPORT ERROR IF TIME OUT 
OCClttS. 

: U ST BIT 1. TIMEOUT Of 1 St C. 

(PASS THE ADDRESS Of THl REGISTER TO T!^ ! . 

;WAIT H1H REQUF.Sr CODE TO CLEAR. 

: L)0 REPORT ERROR U COOt DID NO! CLEAR IN 

WAl! ► OH BMP CODE TO APPEAR IN THE FIFO, REPORT ERROR IF TIME .X'T 
OCCURS. 



MOV 


Oil /SO, HI 


MOV 


I PRA.H2 


JSR 


PC.WAtBIC 


BCC 


6$ 



IMF . 



C/0HU1O DHUil 
HARDWARE Tl- ST 



7 361 

7 3b 5 
7364 
7 365 

7 36" 

7 3b8 

736^ 

73/0 

737 1 

75/2 

73/3 

73/4 

73/5 

75/6 

7377 

75/8 

73/4 

7 380 

7 381 

738-? 

7583 

7384 

7585 

7386 

7 38/ 

7388 

7384 

7 3wu 

7 341 

7542 

7543 

7 394 

7 345 

734b 
7 34/ 
7 348 
734-> 
7400 
74ol 
7402 
740 3 
7404 
7405 
7406 
740 / 
7 4 OH 
7409 



03645b 
036462 

03646b 

0364/2 
0364/6 



F'UNC 1ST 



00526 / 
012/01 
016/02 

004/6/ 
105031 



036500 

036504 
036510 
036512 
036516 
036522 
036524 
036526 
036532 
036534 
036536 
056542 
056544 
036546 
036552 
036554 
036560 

036562 
056564 

0365/0 
036570 



03b 1 . ,\> 
036600 



36602 
036604 
056606 
3b610 
i)3f>ol4 

l)5r>.]4 



00526/ 
01770? 
100024 
00526/ 
012700 
040200 
001016 
00526 i 
010200 
000300 
042/00 
120400 
001006 
120227 
001413 
004 767 
000410 

010401 
012702 



104460 



005204 
U05 '05 
001 302 
00506 / 
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145306 
0/0012 
14 3550 
164572 
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5EQ 189 



1*5264 
143534 

145252 

170301 



145236 

177760 

000305 
163516 

014643 



1434 72 



6*: 



INC 

MOV 
MUV 

JSR 

BCC 



ERRNBR 

O70012.R1 

CSRA.R2 

PC.WAIBIS 

6* 



(SET ERROR NUMBER 10 5103. 

{TEST BIT 7, TIMEOUT OF" 10 MILL! St'CS. 

t PA55 THE ADDRESS OF' THE. REGISTER TO TEST. 

{WAIT EOR RX DATA AVAILABLE TO SET. 

;G0 REPORT ERROR IE CODE DID NOT CI EAR IN TIME 



READ THE. RMP CODE 
DETERMINE IE IT I 1 



(IF" IT IS THERE ) FROM 
, A VALID BMP CODF , 



THE RRUE REGISTER 



VERILY THE BMP CODE WAS RECEIVED EROM THE CORRLC f 
IF' THE BHP CODE DOES NOT INDICATE DUT RUNNING OK, 
THE OUEUE TO BE REPORTED IN A LATER TEST. 



CM ANNE I . 
1HEN SAVE IT 



ON 



INC 
MOV 

BPL 
INC 
MOV 
B1C 

ONE 
LNC 
MOV 
SWAB 
BIC 
CMPH 

HNE 
CMPH 

\\i U 

JSR 

BR 

MOV 
MOV 

ERROR 



ERRNBR 

9RBUEA.R2 

6* 

ERRNBR 

#1 70301, RO 

R2.R0 

6$ 

ERRNBR 

R2.R0 

RO 

01///60.R0 

R4.R0 

6$ 

R2.0305 

8$ 

PC.^AVRMP 

81 

R4.R1 
*EM3l0a»R2 



A VALID BMP CODE. 



iSET ERROR NUMBER TO 3104. 

I GET THE BMP CODE EROM THE Elf 0. 

;G0 REPORT ERROR TE NO BMP CODE FOUND. 

t SET ERROR NUMBER TO 3 105. 

{SET-UP A BMP CODE MASK. 

{TRY TO CLEAR THE BMP MASK. 

{GO REPORT ERROR IE IT IS NOT 

I SET 1Ht ERROR NUMBER TO 3106. 

iCOPt tut BMP CODE. 

PUT THE LINE NUTOER IN THE LOW UYTE. 

CI EAR THE UNWANTED BITS. 

DID TW. BMP CODE COME * ROM THE CORRECT LINE/ 

NO; GO REPORT ERROR. 

15 THE BMP CODE A "GOOD ONE"?. 

YES j SKIP SAVING THt BMP CODE ON THE IJUfl*-.. 

SAVE ThiF BMP CODE ON THE QOELK . 
j GO SEE If THERE ARE ANY MORE LINE TO TEST, 



I PAS!) 
{PASS 
j "BMP 



THE I INt NUMBER TO BE REPORHD. 
THF ERROR MESSAGE TO BE REPORTED. 
REQUEST BIT BAD ON LINE:" 

>>>>n ERROR <<<<« . 

TRAP 



CJERROR 



: ♦ 



fcXH THE TEST IF KXTFNOtD ERROR Pi PORTING HAS NOT Ht EN ENAHU 



OV-W 000100 143424 
001403 



HIT 9\M T06, OPTION 

BE 60$ 



{MIT WITH TEST JAIliiRf' Mf SsAC.f IF 

;N0 EXTENDED ERROR REPORTING HAS BEEN REQUESTED 



; VERIFi All ACTTVl I INES HAVE BM N TESTED. 



60*: 



INC 


UA 


1ST 


R". 


HN» 


. 1 


Ci R 


CTRLCE 


tNursT 





jlNCRiMENT THE I INE Nl*1Ht» COUNTER. 

j ARE 1HERI ANY MORE ACTIVE LINES TO TEST.- 1 . 

;US; BRANCH I U TfcST \Hl NEXT LINK 

j INDICATE THAT WE ARE NO f WITHIN A TIM. 



L 10056: 



036614 104401 



TRAP 



C*EIST 



[ 



C/DHW10 DHU-il K'NC 1ST 

HARpwAm n ST 

74 1 1 
74 12 
741 3 
74 14 
74 IS 
741t. 
741 ' 
7418 
74 V* 
7420 
74.'? I 
74 A 1 



7 4.: 5 
7424 
7425 
74 26 
74.?/ 
74 2d 
7429 
74 50 
7451 
74 32 
74 51 
74 5 A 
74 AS 
74 36 



/4 5/ 
/4 5H 
/4 V* 

/440 

/441 



036616 
036616 

036616 
036624 
036632 
036636 

05664 c 1 
036644 



000032 

ol^7bf 

012/6/ 
016702 
012703 
020205 
001411 



036646 
036652 
0366 V 
036654 
036656 
056660 

05666*.' 

0366/0 
0566/4 
03 Mi 74 
0366/4 



012/6/ 

005067 

104401 
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000032 
17V 77/ 

143666 
002526 



012701 015433 

104455 
022125 

01525/ 
01726.? 



002526 

143412 



143500 
143454 



143634 



50TTI. HARDWARE TEST - REPBMP 

♦ . ^4 + ^ + *** + + + ** + + + * + ****+********* + *** + ****** + *** + ****.********** + ******** + ** + 

♦ REPORT ANY BMP CODES IN TKF QUEUE 

♦ THIS IS A PSEUDO-TEST USED TO REPORT ANY BMP CODES THAT WERE FOUND 

♦ IN THE DUT'S FIFO DURING PREVIOUS TEST, AND LOGGED IN THE BMP COD* 
QUEUE . 

♦ II 15 UNLIKELY THAT RUNNING THIS PSEUDO-TEST ALONE WILL PRODUCE ANY 

♦ ERROR REPORTS. 



BGNTST 

T26; : 

j INCREMENT THE. ASSEMBLY TIME TEST COUNTER. 

iSET UP THE TEST NUMBER. (93) 

j INDICATE THAI WE ARE IN A TEST. 

{GET THE CONTENTS OF THE POINTFR. 

I GET THE START ADDRESS OF THE QUI Ut . 

j SEE IF THE POINTER HAS MOVED FROM THE BASE. 

(EXIT NO CODES IN THE QUEUE.. 



TNUM •- TNUM ♦ 1 

MOV OTNUM.TSTNUM 

MOV #-l,CTHLCE 

MOV BMPCQP R2 

MOV 4BMPCQB.R3 

CMP R2.R3 

BEQ 60$ 



J - 



THERE IS AT LEAST ONE BMP CODE IN THE QUEUE. REPORT THE ERROR. 
jRFPORT ERROR BMP CODE FOUND IN TEST NN, HMP CODE iNNNNNN" 



MOV 
ERRDF 



*EM9304,R1 {PASS THE FIRST MESSAGE 10 BE REOHTED. 

9301 t EM9301»ER9301 { >>>>> ERROR 09301 <<<<< 

TRAP 
.WORD 

.UCRD 
, WORD 



CU.HD* 
9 501 
EM9301 
LR93g; 



605 



MOV 

CI R 
ENDT 



0HMPCQB. BMPCQP 
CTRLCF 



ST 



jSM POINTER tt*0< TO THf BEGINING Of THE QUE. 
{INDICATE THAT WE ARE NOT UIThIN A TEST. 

L 10057: 



StQ 190 



TRAP 



C*ETST 



CZDHUKO DHU 11 
HARDWARE TEST 



FUNC TST 



Jl 



_J 



PARTI MACRO 
- REPBMP • 
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SfcU 191 



74 SO 
74 SI 
74V 
74S3 
74S4 
74S5 
74S6 
74S7 
74S8 
74 S ( ) 
7460 
7461 
74 62 
7463 
7464 
7465 



74 66 
74 /6 
7477 



74 /tt 
74 79 



/480 
/481 



7463 



7484 
/4HS 
M86 



748/ 
74**4 
/495 



0566/6 
036676 
036700 



036700 
036700 
056/0? 
036/04 
036706 

056710 
036/10 

036/ 1;> 
056714 
036 716 

036720 

036720 
036/22 
036/24 
036/26 
036730 

036/3*? 
56/32 
0367 54 
036/36 
056/40 
036742 



036744 
056744 



056/4 4 
036/4/ 
036 /S 2 
056 /SS 
036/60 



000022 



000051 
036 744 
160000 
177776 



001051 
036762 
000040 
000//6 



002052 
037015 
1/7777 

000000 
17777/ 



005052 
05/04 5 
0003// 
000000 
000006 



103 
040 
104 
12* 
040 



.SBTTL HARDWARE PARAMETER CODING SECTION 



THE HARDUARE PARAMETER CODING SECTION CONTAINS MACROS 
THAT ARE USED BY THE SUPERVISOR TO BUILD P TABLES. THE 



MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS RUT ARE 
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THE OPERATOR. 



UGNHRD 



jUEVICE CSR ADDRESS QUESTION: 

GPRMA HWPTQI.0,0, 160000, 1/7/76, YES 



{DEVICE INTERRUPT VECTOR QUESTION: 

GPRMA HWPTQ2 I 2,0,40,776,YES 



j ACTIVE LINES BIT MAP QUESTION: 

GPRMO HWPTQ3 , 4 , U , MAPLNS , , MAPLNS , YE S 



L*HARD 



jINTERRUPT BR LEVH QU STIUN: 

GPRMU HWP T U4 , 6 , 1 3 7 7 , , 6 , Y E S 



125 
101 
122 
12* 
000 



12"* 
104 

:os 

072 



ENDHRD 



hwp run .asci/ /csr address: / 



1.10060 



WORD L10060-L SHARD/2 



WORD 


MCUDt 


WORD 


HWP1Q1 


WORD 


1 SLULIM 


WORD 


T$H1LIM 


WORD 


T*CODt 


WORD 


HWP t ^2 


WORD 


7*1.01 IM 


WORD 


T*HILIM 


WORD 


MCUDE 


WORD 


HWPTQ5 


WORD 


MAPLNS 


WORD 


TSl.Ol IM 


WORD 


TJHILIM 


WORD 


MCOPE 


WORD 


HUPTQ4 


WORD 


3; • 


WORD 


1 U.ULIM 


WORD 


TSHILIM 



EV^N 



1< 1 r ) 



C/DHUBO DHU-il ft INC TST PAHT1 MACRO M1200 
HARDWARE PARAMETER CODING SECTION 



7496 


036 762 


111 


116 


124 




056765 


105 


122 


122 




056770 


125 


120 


124 




036773 


040 


126 


105 




0367/6 


103 


124 


11 / 




037001 


122 


040 


101 




037004 


104 


104 


122 




03/00/ 


105 


123 


123 




037012 


072 


040 


000 


7497 


03 7015 


101 


103 


124 




03 7020 


11? 


126 


105 




03 7023 


040 


114 


111 




037026 


116 


105 


040 




037031 


102 


Hi 


124 




037034 


040 


115 


101 




037037 


120 


072 


040 




03 7042 


000 






7490 


03/04 3 


111 


116 


124 




037046 


105 


122 


122 




037051 


125 


120 


124 




03/054 


040 


102 


122 




037057 


040 


114 


105 




03/062 


1**6 


105 


114 




03706b 


072 


040 


000 


74 1 *** 










7 boo 
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HWPTU2: .ASCI/ /INTERRUPT VbCTUR ADDRESS; / 



^EQ 192 



HWPTQ3: .ASCIZ /ACTIVL LINE ^IT MAP- / 



HWPTU4: ,ASCIZ /INTERRUPT BR LEVEL: / 



.EVEN 



L 1 5 



CZDHUBO OHU-li F'UNC 1ST PARTI MACRO M1200 
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7509 
7510 
7511 
7513 
7515 
7514 
7515 
7516 
751-' 
7518 
751 c > 
7520 
7521 
7522 



7523 
7533 
7533 



7534 
7535 



7536 
7537 



7 538 
7539 
7540 
7541 

7543 
754 3 
7544 



754 S 
7546 
754 7 



03/070 
03i *0/0 

037073 



037073 
037073 

03 7074 
037076 

037100 

03 7100 
037102 
037104 

037106 

037106 
037110 
037112 



03/114 
037 114 



037116 
03/116 
03 7120 
03/122 
03/124 
037126 



03/130 
03 7130 



7 54 a 
754 S 
7556 



03/130 
037133 
03/136 
03/14 1 

037144 



000017 



000130 
03 7130 
000020 



000130 
037204 
000001 



000130 
037255 
000100 



006044 



001052 
037310 
1777/7 
000000 
177777 



122 
11/ 

040 
111 
116 



SBTTL. SOFTWARE PARAMETER CODING SECTION 



THE SOFTWARE PARAMETER COOING SECTION CONTAINS MACROS 
THAT ARE USED BY THE SUPERVISOR TO BUILD P- TABLES. THE 
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT APE 
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THE OPERATOR, 



BGNSFT 



{UNIT NUMBER PRINTOUT QUESTION: 
GPRML SWPTQ1, 0,20. YES 



jROM VERSION NUMBER PRINTOUT ON FIRST PASS QUESTION; 
GPRML SWPTQ2,0,1,YES 



{EXTENDED ERROR REPORTING QUESTION: 
GPRML SWPTQ3, 0,100, YES 



LSSUFT; - 



.WORD L10061~L$SQFT/2 



.WORD TSCODh 



.U. 



SWPTQ1 



♦ UGt • 20 



.WORD TSCODE 
.WORD SWPTQ2 
.WORD 1 



.WORD TSCODt- 
.WORD SWPTQ3 



.WORD 100 
! IF EXTENDED ERROR REPORTING IS NOT REQUIRED THEN SKIP THE NEXT QUESTION. 
XFERF ENDD 



{NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE QUESTION; 
GPRMD SWPTQ4,2,D, 17 7777,0, 177777, YES 



.EVEN 

ENDD; INDSFT 



.WORD TSCODE 



.WORD T $COOE 

.WORD SWPTQ4 

.WORD 1///// 

.WORD T SI. 01. IN 

.WORD TSHILIM 



.EVEN 



1.10061; 



105 
122 

125 
124 
125 



1.24 

116 
04 
115 



SWPTQ1: .ASCI/ /REPORT UNIT NUMUER AS EACH UN11 IS TESTED; 



M 1 5 



TWhRE 



7557 



7558 



7559 



7560 



DHU-11 TUNC 1ST PARI1 MACRO M1200 


PARAMETER 


CODING 


SECTION 




037147 


102 


105 


122 


03 7152 


040 


101 


123 


037155 


040 


105 


101 


037160 


103 


110 


040 


037163 


125 


116 


111 


037166 


124 


040 


111 


037171 


123 


040 


124 


037174 


105 


123 


124 


037177 


105 


104 


072 


037202 


040 


000 




037204 


122 


117 


115 


037207 


040 


126 


105 


037212 


122 


123 


111 


037215 


117 


116 


040 


037220 


120 


122 


111 


037223 


116 


124 


117 


037226 


125 


124 


040 


037231 


117 


116 


040 


037234 


124 


11C 


105 


03723/ 


040 


106 


111 


037242 


122 


123 


124 


057245 


040 


120 


101 


037250 


123 


123 


072 


037253 


040 


000 




037255 


105 


130 


124 


037260 


105 


116 


104 


037263 


105 


104 


040 


037266 


105 


122 


122 


037271 


117 


122 


040 


03 72/4 


122 


105 


120 


037277 


117 


122 


124 


037302 


111 


116 


10 7 


037305 


072 


040 


000 


03/310 


116 


125 


115 


037313 


102 


105 


122 


037316 


040 


117 


106 


037321 


040 


111 


116 


037324 


104 


111 


126 


037327 


111 


104 


125 


037332 


101 


114 


040 


037335 


104 


101 


124 


037340 


101 


040 


105 


037343 


122 


122 


11/ 


03 7346 


122 


123 


040 


037351 


124 


117 


040 


03 7354 


122 


105 


120 


037357 


117 


122 


124 


037362 


040 


117 


116 


03 7 365 


040 


101 


040 


03/3/0 


114 


111 


116 


0373 7 3 


105 


072 


040 


037376 


000 
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SWPTQ2: »ASCIZ /ROM VERSION PPINTOUT ON THE FIRST PASS: / 



SWPTQ3: 'XSCU /EXTENDED ERROR REPORTING: / 



SWPTQ4: ,ASCI2 /NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE: / 



♦ EVEN 



N15 

IZDHUBQ OHU-11 TUNC TST PARTI MACRO M1200 15-MAR-84 09:15 PAGE 128 
SOFTWARE PARAMETER CODING SECTION 



SEQ 195 



7569 
7S?0 
7571 
75/2 
7573 
7580 
7581 
758? 
7585 
7584 



7535 
7586 
7587 
7588 
7589 
7590 
7591 
7592 
7593 



037400 
037400 



$PATCH: : 



.BLKW 24 



037450 

037450 
03745c? 

037454 
037454 



LASTAO 



000000 
000000 



EVEN 

WORD 
WORD 



L$LAST: j 



ENDMOD 



000001 



.END 



C/DNt-HO 


UMLI 1 1 » 1>NC 


TbT PARTI 


HACRO H1200 


15-P*R «4 


09 j 15 PAGE 128 


I 












SiMHOi. 


rtBl f 






















AC T I N5 


002230 G 


C»AU • 


000052 


DROP 


025122 


E MO 902 


010766 


G 


EM9023 


01521/ 


5 


KDR 


000020 I. 


CtAUTO* 


000061 


DRCOMG 


005464 G 


EM1001 


01102." 


G 


EM9024 


015241 


G 


AURPTR 


017764 G 


CIBRK • 


000022 


DR02MG 


0054 70 G 


EM1002 


011055 


G 


EM9301 


01525/ 


G 


AlULD 


017454 G 


CtBSEG- 


000004 


DR04MG 


0054/5 G 


EM1003 


011142 


G 


FM9302 


0155 56 


n 


ASStMB- 


000010 


CIB5UB- 


000002 


DR06HG 


005501 G 


EMUC1 


011220 


G 


EM9303 


015366 


ii 


BCOUNT 


002552 G 


CICFTC- 


000045 


DR10HG 


005517 (i 


EM1201 


011273 


G 


EM9504 


015433 


G 


BITTBL 


0024 10 G 


CtCLCK- 


000062 


DR12HG 


005526 G 


EM1202 


011521 


G 


ENOD 


03/130 




BITO - 


000001 G 


CICXEA- 


000012 


UR14MG 


005537 G 


EM1203 


011405 


G 


ENOETB 


005 726 


Ci 


BITOO - 


000001 G 


CICLOS* 


00OO55 


DR16MG 


005550 G 


r Ml 204 


011465 


f, 


FNDIT 


025042 




niToi - 


000002 G 


CICl.Pl- 


000006 


EDROP 


025200 


EM1205 


01151/ 


G 


ERCNTB 


002464 


fi 


BITO J * 


000004 G 


CICVEC* 


000036 


EF.CO^- 


0OO036 G 


EM1501 


011545 


G 


ERl TBI 


002 726 


ti 


UH05 • 


000010 G 


CIDClN- 


000044 


EF.NE.W- 


000055 G 


EM1502 


0115/6 


r. 


f.RRBLK 


003 7/4 


f. 


BIT04 - 


000020 Li 


CIOOOU- 


000051 


Ef .PWR- 


000034 G 


EM1401 


011655 


G 


ERRM5G 


0057/2 


(j 


BITOS - 


000040 G 


CIDRPT- 


000024 


El .RES- 


0000 5 7 G 


IM1402 


0116/4 


u 


I RRNBR 


00 3/70 


G 


BIT06 ■ 


000100 G 


CIDU - 


000055 


V ,STA- 


000040 G 


EM1405 


011762 


G 


i RRTtP 


00 5 766 


i j 


BITO/ * 


000200 G 


CIEDIT- 


000003 


EF0503 


004074 G 


EM1404 


012035 


G 


ERSMRF 


002462 


G 


BUOfl - 


000400 G 


CIEROf- 


000055 


EF0505 


004101 G 


EM1405 


01210/ 


G 


EP0101. 


015510 


G 


BIT09 • 


0010O0 b 


CIERHR- 


0OO056 


EF1401 


0O4154 G 


EM1406 


012122 


G 


erg.: 01 


016042 


G 


Biri - 


0O0O02 G 


CIERRO- 


000060 


Eri402 


004256 G 


EM1407 


012135 


G 


ER050 3 


016156 


G 


BIUO ' 


002000 G 


CfERSF- 


000054 


EF1601 


004313 G 


EM14Q8 


01214/ 


G 


ER0504 


».\6174 


D 


BITU ' 


004000 G 


CIER50- 


00005 7 


EF1602 


0O4545 G 


EMJ.501 


012155 


G 


ER1401 


01-5254 


G 


BIT 12 - 


010OOO G 


CIESCA. 


OOOOiO 


EF1605 


004407 G 


EM1502 


012203 


G 


ER1601 


016416 


G 


bins • 


020000 G 


CIE3EG- 


000005 


EF1604 


004451 G 


EM1601 


012221 


G 


\ R1603 


016526 


G 


BITU - 


040000 G 


CIESUB- 


000003 


EF3001 


0O4546 G 


EM16G-4 


012504 


G 


ER5001 


016620 


{> 


HUl'i - 


100OO0 G 


CtETST- 


000001 


EF3002 


0O4615 G 


tMi 701 


012360 


G 


ER9004 


016 722 


G 


BH2 - 


000004 G 


CIF.XIT- 


000032 


EF9006 


0O4664 G 


EM1801 


01244 3 


G 


eR9CO/ 


01 70 36 


G 


BIT3 - 


000010 G 


C«GCTB- 


000026 


EF9010 


004/10 G 


EM1901 


012517 


G 


ER9O08 


01 M26 


G 


BIT4 » 


000020 G 


CIGETW- 


000027 


EF9016 


004777 G 


EM2001 


012602 


G 


ER9101 


017222 


G 


HIT*. * 


000O40 G 


C»GMAN« 


• 000043 


EFXH7 


OO50/4 G 


EM2002 


012652 


G 


ER9 301 


017262 


G 


BU6 - 


000100 G 


C»GPMR. 


• 000042 


EF9018 


005150 G 


EM2501 


01*7 7.35 


G 


E VI 


OOOOfM 


I, 


BIT/ . 


000 2CO G 


CIGPL0« 


- OCOO50 


M9501 


0O5255 G 


EM2502 


012/72 


G 


I *0€RR 


002 304 


G 


BITft - 


000400 (. 


CIGPRI' 


• 000040 


k 19302 


005333 G 


EM2401 


0150 30 


f, 


I IE NO ■ 


002100 




BIT'* - 


OOIOOO G 


CIINIT- 


• OOOOU 


I.M0101 


020560 G 


EM2601 


0150/3 


G 


Ell.OAO* 


0OO0 35 




BMPCQB 


002526 G 


CilNLP 


• 000020 


EMO102 


020444 G 


EM2602 


015151 


G 


F DATA 


002250 


G 


HMVCUE 


002/26 G 


CIMANI' 


000050 


EMul05 


005560 G 


i M260 5 


01 3222 


L> 


» 51 5 A 


002250 


'.i 


UMPCQP 


002524 G 


CIMEM 


• 000051 


EM0201 


005616 G 


IM2604 


013510 


G 


*■ 51 jO - 


000006 


G 


HOE 


000400 G 


CtHSG 


• 000025 


EM0202 


005651 G 


EM2605 


01 3404 


i. 


F Irtt.i 


000015 




PRlfvi 


002240 G 


CIOPEN 


* 000054 


EH0203 


006024 G 


EM2606 


0134*' 


G 


} IAUTO" 


000020 




B>BAS 


002/26 G 


CIPNTB 


• 000014 


EM0204 


006 !. b 7 G 


EM260/ 


1 5526 


G 


f IBGN ■ 


0OOO40 




B»» end 


005 726 G 


CIPNTF 


- 0OO017 


EM0501 


00r.r.46 G 


EM2608 


015622 


G 


> ICLEA« 


00000 ■' 




H'.* MID 


005526 G 


CIPNTS 


• 000016 


EH0502 


0064 20 G 


EM2609 


0136/3 


(, 


FIOl' ' 


0000 1 6 




B'J»'PTR 


002 302 G 


CIPNTX 


• OOOOL5 


EMO505 


006560 G 


EM2610 


015 752 


I. 


f IENO • 


00004 1 




BL* 3QT 


003526 G 


CIUIO 


■ 000577 


EM0401 


006/57 G 


I M26 1 1 


014044 


G 


► IKARD- 


000004 




CAcmx 


023632 G 


ctRoeu 


• 000007 


EMO402 


00>Ol5 '., 


EM2612 


01412/ 


(> 


f iMy « 


00001 3 




CACMTX 


025660 G 


CIRETG 


• 00004? 


EH0501 


00U6S (, 


FM5001 


01422 3 


[• 


f 1 INI T « 


0O0OO6 




CAl MSl 


01/526 G 


CIRESE 


• 0OOO55 


E'T2 r .'2 


00/241 G 


EM 5002 


014262 


G 


> $.)MP • 


• 0OO050 




CKTPAP 


017 752 G 


CIREVI 


• 000O0 5 


EM0525 


00/415 G 


C-M3003 


014 356 


G 


> moo 


• QOQOCO 




CI KBRL 


002356 G 


CtRrLA 


- 000021 


EMC 5 '* 


00/505 G 


EM 5004 


014432 


G 


f IM'.G ■ 


' 0000 1 1 




Cl KCSR 


002 5 54 G 


CIRPT 


- 000025 


EM060 


uO/5/5 i, 


> M50O5 


014506 


G 


► IPROT* 


• 00002 1 




Cl KMR/ 


002 542 G 


CISEFG 


• 00O046 


EMu60. 


■ 0/65/ G 


IM5101 


014600 


u 


f IPWK 


• 0000 1 .* 




Cl KINT 


023 706 G 


CISPRI 


• 00004 1 


EM060 , 


010017 G 


IMS 102 


01464 5 




y *Rpr 


- 000012 




Cl KvtC 


002 540 G 


ClbVtC 


• 00003/ 


L HO 701 


01020.' ■". 


\ M9014 


014/22 




f 1 if c. 


« 00000 3 




Cl WST 


020002 G 


CITPRI 


- 000013 


1 MO -'02 


01024% G 


IM'*01 / 


015016 




> ISO* T 


• 00000*' 




Cl R16U 


0200c'4 G 


Df I. A r 


020124 i. 


(MO 70 3 


010425 G 


} H90 \ A 


OiM." 




y I5RV 


• 0002 10 




CNTf RW 


020046 <» 


t)» PTBl 


00.V12 G 


IMOftOl 


010M0 '• 


*M»*OW 


01M3' 




^ $-,'41 


• 000002 




C'.iR** 


002242 G 


UIAGMC 


* 02)0000 


\ MOHO.' 


01065*. ii 


\ M9"2t» 


O 15154 




> J'>W 


» 00001.1 




CTRUC^ 


00^'iOt (i 


DRAQHT 


o6wVA fc » a 


immi 


010/J6 G 


LM^UwV 


015200 


G 


KITES! 


* k.\^000\ 
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iitTPRM 
tiPRSOa 

GtCNTO- 
GtDELM- 

GtOISP" 
Glt.XCP- 
GtHlLl • 
Gtl.OL.l- 
GtNO • 

Giorrs- 
Giorsi- 

GIPKMA* 
GIPRMO- 
GIPflMl - 
GiRADA- 
GtRADB> 
GtHADD- 
GIRADl - 
GtRADO- 
GtXF LR» 

nuts - 

HELP - 

HOE 

HVAMU1 

HUPTQ? 

MUM QS 

HWPTQ4 

I (II 

IDU 

It-H 

lt.STAT 

1SR 

I xt 

IIAu 

IIAUTO 

1 tCl N 

t tr» • 

II**D 
1 UNIT 
It MIX) 
I tMSG 
I I PHOT 
t IPfAH 
i tPUH 
I tRPT 
ItStG 
It SMI I 
I iSf T 
I fiHV 
H5UB 

itrsi 

JUMP 
( NCTRA 
t 01 
I m 

J PC >i.T 
LPRA 



024640 
002450 

000200 

0005 72 

000003 

000400 

00000? 

000001 

000000 

000400 

000370 

000001 

00000*? 

000000 

000140 

000000 

000040 

000 120 

000020 

000004 

000010 

oooooo 

100000 
03b .'44 
036 76? 
03 70 IS 
03/043 
010000 
000040 
020000 
002510 
000 1 00 
004000 
00004 1 
00004 1 
00004 1 
0OOO41 
000041 
00004 I 
OO0O4 1 
000041 
000040 
000O4 1 
00004 1 
0O004 1 
000O41 
00OO4 1 
OOOC41 
0O0O4 1 
0O004 1 
OOO04 1 
00016/ 
00225*' 
040000 

ooooio 

0000 3f, 
OOti^'46 



G 
G 
G 
G 

G 



l PRO • 

LIACP 

L.tAPT 

LtAU 

LtAUT 

LtAUTO 

I JCCP 

LtCl.EA 

L .ICO 

LIDEPO 

LtDESC 

L.tDESP 

LtDEVP 

I tOISP 

LIDLY 

LtDTP 

LtDTYP 

I IDU 

LtDUT 

LIDVTY 

LIEF 

LIENVI 

LtERRT 

LtETP 

LIEXP1 

LIEXP4 

LIEXP5 

LI HARD 

LtHlHf. 

LtHPCP 

LIHPTP 

L»HW 

LtlCP 

LtlNIT 

L II AQP 

I ILAST 

LILOAD 

i Hun 

IIMREV 

I INAME 
L 1PRI0 
L IPROT 
LIPRT 
I IRFPP 
LIRFV 
LtRPT 
Lt50f T 
I ISPC 
I tSPCP 
LI5PTP 
LtbTA 

I tsu 

• TEST 
tllMl 
JiiNI f 

10000 



Liooo; 



000004 

002110 

00203t> 

025206 

0020 70 

025056 

002106 

025060 

002032 

002011 

004046 

002076 

002060 

002124 

002116 

002040 

002034 

0250 76 

0020 72 

004036 

002052 

002044 

003766 

0C2102 

002046 

002064 

002066 

036 700 

002120 

002016 

002022 

002212 

002104 
024236 
002026 
03 7454 
002100 
0020 74 
002050 
002000 
0020-4? 
024230 
002112 
00206? 
002010 
024222 
03 707? 
002056 
002020 
002024 
0020 50 
002224 
00? 114 
002014 
00201? 
00???.' 
00^2 JO 



G 

G 

G 

G 

I, 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

G 

l.i 

G 

G 

G 

ti 

G 

(> 

G 

ti 

G 

G 

G 

G 

G 

G 

G 

G 

G 
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1.1000? 


015624 


MSI OOP 


020500 


(i 


L 10003 


016134 


MSTICK 


00? 354 


n 


I 10004 


01617? 


NDERPT 


002226 


['. 


L 10005 


01625? 


NEWPAS 


024620 




LI 0006 


016414 


NEWRE5 


024612 




L10007 


016524 


NEU5TA 


024 302 




L10010 


016616 


NUHLNS- 


000020 


G 


L10011 


016/20 


OOPS 


020314 


G 


L10012 


017034 


OPTION 


002224 


G 


1. 1001 3 


017124 


OtAPTS- 


OOOOOO 




L10014 


0l72'?O 


UIAU - 


OOOOOO 




L10015 


017.-60 


OtBGNR- 


000001 




L10016 


01/45? 


OtBGNS- 


000001 




L10017 


024^26 


OIOU • 


000001 




L10021 


0250* 'J 


OIERRT- 


000001 




LI 0022 


0250 r ? 


OtGNSW- 


000001 




L10023 


0250/4 


OIPOIN- 


000001 




L 10024 


025204 


OtSFTU- 


OOOOOO 




I 10025 


025212 


PAROA 


002366 


G 


L 10026 


0254/4 


PASCNT 


002312 


G 


I 10027 


025/24 


PC51 OT- 


000016 


G 


L 10030 


0261/0 


PNT 


001000 


G 


L10031 


026 366 


PREGRT 


004020 


G 


L10032 


026560 


PREG05 


0057/6 




L1O033 


026 7 76 


PRI 


002000 


G 


L1O034 
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